Вопрос по информатике:
Составить алгоритм и программу на Паскале, позволяющую найти сумму натуральных чисел, кратных 12, в диапазоне от 1 до 70
Пожаловаться
- 08.05.2016 21:36
- Информатика
- remove_red_eye 8135
- thumb_up 40
Ответы и объяснения 1
Var i,s:integer;
begin
i:=12;
a:=1;
while a<=70 do begin s:=s+i; i:=i+12; end;
writeln('сумма=',s);
end.
begin
i:=12;
a:=1;
while a<=70 do begin s:=s+i; i:=i+12; end;
writeln('сумма=',s);
end.
Пожаловаться
- 09.05.2016 10:33
- thumb_up 36
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы