Mọi người ai bt giải giải giúp e với ạ Viết phương trình nhập 2 số nguyên x,y và tích hai số đó

2 câu trả lời

Program Hotboy ;

Uses crt;

Var x,y : integer ;

Begin

Clrscr;

Write('nhao so nguyen x'); readln(x);

Write('nhao so nguyen y'); readln(y);

Write('tich hai so',x,' va ',y,' la ', x*y);

Readln

End.

Program Tich_hai_so_nguyen;

Uses crt;

Var X, Y, Tich:integer;

Begin 

  Clrscr;

  Write ('Nhap so X= ');readln(X);

  Write ('Nhap so Y= ');readln(Y);

  Tich:=X*Y;

  Writeln ('Tich hai so ',X,'va','Y la: ',Tich);

  Readln ;

End.