которая находит сумму квадратов всех натуральных чисел от 1 до n. где n вводиться с клавиатуры
Вопрос Pascal. составьте программу
- Автор темы Андрей1999
- Дата начала
FOR I :=1 TO N DO Res := Res + I*I;
Это -- простой цикл от 1 до n, попробуйте сами сделать.
readln
; s:=0; for i:=1 to n do s:=s+i*i; writeln(s); end.
; s:=0; for i:=1 to n do s:=s+i*i; writeln(s); end.- Статус
Похожие темы
- Вопрос
- Вопрос