viết chương trình nhập từ bàn phím 2 số nguyênn a và b, tính và đưa ra màn hình tổng và tích của 2 số đó
2 câu trả lời
var a,b:longint;
begin
write('Nhap vao a = ');readln(a);
write('Nhap vao b = ');readln(b);
writeln('Tong = ',a+b);
writeln('Tich = ',a*b);
readln;
end.
uses crt;
var a,b,s,t: integer;
begin
clrscr;
write ('nhap a: '); readln (a);
write ('nhap b: '); readln (b);
s:=a+b;
t:=a*b;
writeln ('tong la: ',s);
writeln ('tich la: ',t);
readln;
end.
