viết chương trình sử tính tổng của 2 số thập phân vào từ bàn phím sử dụng hàm
0 bình luận về “viết chương trình sử tính tổng của 2 số thập phân vào từ bàn phím sử dụng hàm”
uses crt; var a,b,c:real; {—————————-chuong-trinh-con—————————–} function tong(x,y:real):real; begin tong:=x+y; end; {—————————-chuong-trinh-chinh—————————} begin clrscr; write(‘a=’); readln(a); write(‘b=’); readln(b); write(‘c=’); readln(c); writeln(‘Tong cua ba so la: ‘,tong(a,tong(b,c)):4:2); readln; end.
uses crt;
var a,b,c:real;
{—————————-chuong-trinh-con—————————–}
function tong(x,y:real):real;
begin
tong:=x+y;
end;
{—————————-chuong-trinh-chinh—————————}
begin
clrscr;
write(‘a=’); readln(a);
write(‘b=’); readln(b);
write(‘c=’); readln(c);
writeln(‘Tong cua ba so la: ‘,tong(a,tong(b,c)):4:2);
readln;
end.