** паскале составить программу которая запрашивает у пользователя целое число и выводит...

Question

На паскале составить программу которая запрашивает у пользователя целое число и выводит квадрат

Answer 1

Var  i: integer;
begin
write('введите число ');
readln(i);
write('квадрат этого числа= ',I*i)
end.

Answer 2

Uses crt;
var n:integer;
begin
writeln('Введите число: ');
readln(n);
writeln('Квадрат числа n=',n*n);
end.