Viết chương trình nhập 2 số nguyên a,b.Sau đó in ra tổng,hiệu,tích thương của 2 số đó

2 câu trả lời

Var a,b:real;

Begin

Write ('nhap a=');readln(a);

Write ('nhap b=');readln(b);

Write ('tong la ', a+b);

Write ('tich la', a*b);

Write('thuong la',a/b);

Readln

End.

Nếu bạn thấy hay thì cho mik 5 sao và câu traloi hay nhất nha

uses crt; 
var a,b:word;
begin
clrscr;
    read(a,b);
    writeln(a + b);
    writeln(a - b);
    writeln(a * b);
    writeln(a div b);
readln; readln;
end.