В одну и ту же числовую переменную последовательно вводятся целые числа. Количесвто вводимых чисел заранее известно ( 0 - конец ввода). Определить количество чисел не кратных 5.

Ответы:
ИРА ВОВЧУК
26-06-2016 02:31

На паскале:Var x,k:integer;Begink:=0;RepeatReadln(x);If (x mod 5 = 0) and (x<>0) then inc(k);Until x=0;Writeln(k);End.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Крис Кузьмина

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «В одну и ту же числовую переменную последовательно вводятся целые числа. Количесвто вводимых чисел заранее известно ( 0 - конец ввода). Определить количество чисел не кратных 5.» от пользователя Крис Кузьмина в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!