Program Tinh_Toan;
uses crt;
var a,b: real
begin
clrscr;
write('nhap so a ='); readln(a);
write('nhap so b='); readln(b);
writeln('tong cua 2 so ',a,' va ',b,' =' ,a+b);
writeln('hieu cua 2 so ',a,' va ',b,' =',a-b);
writeln('tich cua 2 so ',a,' va ',b,' =' ,a*b);
readln;
end.
Xin hỏi đề cho a và b là số nguyên hay số thực
Program Tinhtoan;
Uses crt;
Var
a,b,tong,tich,hieu:Integer;
Begin
Write('Nhap so a ');
Readln(a);
Write('Nhap so b ');
Readln(b);
tong:=a+b;
hieu:=a-b;
tich:=a*b;
Writeln('Tong 2 so la',tong);
Writeln('Hieu 2 so la',hieu);
Writeln('Tich 2 so la',tich);
Readln;
End.