25 ноября, 22:04

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

0
Ответы (1)
  1. 25 ноября, 22:21
    0
    На паскале:

    Var x, k:integer;

    Begin

    k:=0;

    Repeat

    Readln (x);

    If (x mod 5 = 0) and (x0) then inc (k);

    Until x=0;

    Writeln (k);

    End.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «В одну и ту же числовую переменную последовательно вводятся целые числа. Количесвто вводимых чисел заранее известно (0 - конец ввода). ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы