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

Question

Антониана

6 августа, 02:16

+1

Ответы (2)

Знаешь ответ?

Василла · Answer 1

Uses crt;

var n:integer;

begin

writeln ('Введите число: ');

readln (n);

writeln ('Квадрат числа n=', n*n);

end.

Нинюра · Answer 2

Var i: integer;

begin

write ('введите число ');

readln (i);

write ('квадрат этого числа = ', I*i)

end.