Вопрос по информатике:
Найти сумму квадратов первых n натуральных чисел/ ох, простите!:DDD на языке паскаль
- 11.08.2018 11:54
- Информатика
- remove_red_eye 14036
- thumb_up 38
Ответы и объяснения 1
Попробуй так: (но у меня нет компилятора под рукой, если что не получится, то напиши мне, разберусь)
------------
program dydaone ;
var i, i2, n, sum : longint ;
write ('vvedi n' ) ;
readln ( n ) ;
sum := 0 ;
for i = 1 to n do begin
i2 := i * i ;
sum := sum + i2 ;
end ;
wrieln ( 'summa kvadratov=' , sum ) ;
end.
- 12.08.2018 06:19
- thumb_up 3
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.