Viết chương trình nhập hai số nguyên từ bàn phím và hiển thị ra màn hình tổng và tích hai số đó

2 câu trả lời

Program baitap;

Uses crt;

Var x,y:integer;

Begin

Clrscr;

Write('Nhap x,y:');

Readln(x,y);

Writeln('Tong cua hai so do:',x+y);

Writeln('Tich cua hai so do:',x*y);

Readln

End.

program tinh_tong_va_tich ;
uses crt ;
var a, b, x, y: integer ;
begin
clrscr ;
writeln('Moi ban nhap so a') ; read(a) ;
writeln('Moi ban nhap so b') ; read(b) ;
x:= a*b ; y:= a+b ;
writeln('Tong cua a va b la',y) ;
writeln('Tich cua a va b la', x) ;
end.