KHÁM PHÁ Học Toán + Tiếng Anh theo Sách Giáo Khoa cùng học online và gia sư dạy kèm tại nhà từ lớp 1 đến lớp 12 với giá cực kỳ ưu đãi kèm quà tặng độc quyền"CỰC HOT".
uses crt; var x,y:real; {—Ham-tong—} function s(x,y:real):real; begin s:=x+y; end; {—Chuong-trinh-chinh—} BEGIN clrscr; write(‘Nhap hai so: ‘); readln(x,y); write(‘Tong: ‘,s(x,y):0:2); readln; END.
function tong(a, b: real): real;
begin
tong:= a + b;
End;
uses crt;
var x,y:real;
{—Ham-tong—}
function s(x,y:real):real;
begin
s:=x+y;
end;
{—Chuong-trinh-chinh—}
BEGIN
clrscr;
write(‘Nhap hai so: ‘); readln(x,y);
write(‘Tong: ‘,s(x,y):0:2);
readln;
END.