Составить программу возведения натурального числа в квадрат, используя следующую закономерность:
I2 =1
2 2=1+3
З2 =1 + 3 + 5
42=1+3+5+7
п2 = 1 + 3 + 5 + 7 + 9 + . . . + 2 п - 1
Программа Pascal
Всё до безобразия просто:
var n:integer; nn:real;
begin
write(Введи число: );
readln(n);
for var i:=1 to n do nn:=nn+(2*i-1);
writeln(n,^2=,nn);
end.
Оцени ответ
