Question

viết chuong trình nhập hai sô a,b từ bàn phím tinhstoongr và tích của a,b rồi in chúng ra màn hình

Answer 1

Program tinh_tong;

Var a, b: integer;

tong, tich: integer;

BEGIN

Write(‘Moi ban nhap vao so nguyen a: ‘); Readln(a);

Write(‘Moi ban nhap vao so nguyen b: ‘); Readln(b);

tong := a+b;

tich := a*b

Writeln(‘Tong hai so ban vua nhap la: ‘,tong);

Writeln(‘Tich hai so ban vua nhap la ‘, tich);

Readln

END.

Answer 2

var a,b,tong,tich:integer;

begin

write('a=');readln(a);

write('b=');readln(b);

tong:=a+b;

tich:=a*b;

writeln(' Tong cua a va b la: ',tong);

writeln(' Tich cua a va b la: ',tich);

readln;

end.