Вопрос по информатике:
Дано целое число N(>0). Найти сумму (1+2)^2+(2+3)^2+...+(N+(N+1))^2
Написать программу для Pascal
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 09.07.2015 11:43
- Информатика
- remove_red_eye 15984
- thumb_up 41
Ответы и объяснения 1
Program xxx;
var N, Sum: integer;
var i: byte;
begin
writeln ('введите N');
readln (N);
Sum:=0;
for i:=1 to N do begin
Sum:=Sum+sqr(i+(i+1))
end;
writeln (Sum)
end.
- 01.01.1970 00:00
- thumb_up 19
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.