viết chương trình nhập 2 số nguyên từ bàn phím và hiện thị ra màn hình tổng và thương 2 số đó
2 câu trả lời
uses crt;
var a,b:real;
begin
clrscr;
read(a,b);
writeln(a + b:0:2);
writeln(a / b:0:2);
readln; readln;
end.
Program tinhtong_thuong;
uses CRT;
var x, y,s,t: real;
BEGIN
CLRSCR;
Write('Nhap x:');Readln(x);
Write('Nhap y:');Readln(y);
s:= x+y;
t:=x/y;
Writeln('x + y =',s:4:2);
Writeln('x / y = ',t:4:2);
Readln;
END.