Вопрос по информатике:
1)Напишите программу, которая в последовательности целых чисел определяет количество четных чисел, кратных десяти. Программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом ноль (ноль – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введенные числа по модулю не превышают 30000.
2) Напишите эффективную программу, которая по двум данным натуральным числам х и у, не превосходящим 10000, выводит на экран и подсчитывает количество натуральных чисел, кратных восьми, на отрезке [х,у] (включая концы отрезка).
Напишите пожалуйста на языке Паскаль. использовать циклы "до" и "для"
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 20.05.2015 22:50
- Информатика
- remove_red_eye 8110
- thumb_up 23
Ответы и объяснения 1
program qwerty;
var i, n:integer;
BEGIN
n:=0;
readln (i);
while i0 do
begin
if i mod 10=0 then
n:=n+1;
readln (i);
end;
writeln (n);
END.
- 21.05.2015 07:53
- thumb_up 9
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.