Вопрос по информатике:
Вывести все числа от 1 до 1000, которые: -- кратны и 3 и 5
и сделай чтобы цикл начинался с 1000, а заканчивался на 1
т.е. чтобы в первой итерации цикла i было равно 1000
а в последней - 1
итерация цикла - один прогон цикла
- 02.09.2018 17:00
- Информатика
- remove_red_eye 3180
- thumb_up 8
Ответы и объяснения 1
Var a:
integer;
beginfor a:=1000 downto 1 do begin
if (a mod 5 = 0) and (a mod 3 = 0)
then writeln(a);
end;
end.
предупреждаю что время исполнения программы на моём компе 9.29 сек.
- 03.09.2018 05:52
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.