Программа Для чисел от 1 до n составьте программу возведения данных чисел в квадрат. n...

Question

Программа
Для чисел от 1 до n составьте программу возведения данных чисел в квадрат. n вводится с клавиатуры.
помогите, пожалуйста, даю 20 баллов, постарайтесь правильно составить:)

Answer 1

Var n,i:integer; 
begin
write('n = '); readln(n);
for i:=1 to n do writeln(i,'^2 = ',i*i);
end.

Пример:
n = 5
1^2 = 1
2^2 = 4
3^2 = 9
4^2 = 16
5^2 = 25

Comments

спасибо большое!))