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

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

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