Viết chương trình nhập vào 2 số nguyên x, y từ bàn phím và in ra tích, của x và y?

2 câu trả lời

uses crt;
var x,y:word;
begin
clrscr;
    read(x,y);
    writeln(x * y); 
readln; readln;
end.

uses crt;

var x,y,S:integer;

begin

write('nhap x:');readln(x);

write('nhap y:');readln(y);

S:=x*y;

writeln('Tich cua x va y la: ',S);

readln;

end.

Câu hỏi trong lớp Xem thêm