Пишите программу, которая считает квадрат числа n и выводит на экран

//Pascal
var N: real;
begin
  write('Введите число: ');
  readln(N);
  writeln('Квадрат числа ', N, ' = ', sqr(n));
  readln;
end.

Я тебе по айпи выслежу вмести решать будем