Вопрос по информатике:
Паскаль, найти сумму квадратов черных чисел натурального ряда до 100
- 08.09.2017 09:23
- Информатика
- remove_red_eye 15389
- thumb_up 39
Ответы и объяснения 1
Var i, sum: integer;
begin
sum := 0;
for i := 1 to 50 do
{answer too big => -24908}
begin
sum := sum + i * i * 4
end;
writeln('Sum = ', sum);
readln(i) {programm don't stop and so can read answer}
end.
- 09.09.2017 22:07
- thumb_up 17
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.