Program square_num;
var n1,n2:integer;
Begin
writeln('Напишите первое число:');
read(n1);
writeln('Напишите второе число:');
read(n2);
writeln(n1, '×' ,n1, '=' ,n1*n1);
writeln(n2, '×' ,n2, '=' ,n2*n2);
End.
Program square_num;
var n1,n2:integer;
Begin
writeln('Напишите первое число:');
read(n1);
writeln('Напишите второе число:');
read(n2);
writeln(n1, '×' ,n1, '=' ,n1*n1);
writeln(n2, '×' ,n2, '=' ,n2*n2);
End.