Вопрос по информатике:
Требуется использовать язык Паскаль
Даны три целых числа A, B, C. Значения чисел вводятся с клавиатуры. Определить количество нулей среди данных чисел. Результат вывести на экран.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 14.12.2017 06:32
- Информатика
- remove_red_eye 19741
- thumb_up 11
Ответы и объяснения 1
{PascalABC}
var a,k,i:integer;
begin
for i:=1 to 3 do begin
write('Введите число ',i,' = ');readln(a);
while a>10 do begin
if a mod 10 = 0 then k:=k+1;
a:=a div 10;
end;
end;
writeln('Кол-во нулей в данных числах = ',k);
end.
- 15.12.2017 00:49
- thumb_up 10
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.