Задать вопрос
2 июля, 21:19

С клавиатуры вводятся числа до сих пор пока не введено число - 5. Найти количество чисел кратных 13 из введенных.

+1
Ответы (1)
  1. 3 июля, 01:13
    0
    Var i, s:integer; beginwhile i-5 do beginreadln (i) ; if i mod 2=0 then s:=s+1; end; writeln (s) ; end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «С клавиатуры вводятся числа до сих пор пока не введено число - 5. Найти количество чисел кратных 13 из введенных. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
С клавиатуры вводится последовательность чисел до тех пор пока не будет введено число 0 найти количество чисел из введенных кратных 5
Ответы (1)
Произвольным образом вводятся числа до тех пор, пока не будет введено число 15. Определить количество этих чисел и найти значение 15k, где k - количество введённых чисел. Результат вывести на экран
Ответы (1)
Составьте схему алгоритма программы, которая будет осуществлять ввод чисел до тех пор, пока не будет введено число 17. Как только будет введено число 17, программа должна вывести количество введенных чисел
Ответы (1)
1) с клавиатуры вводятся количество целых чисел и сами числа. найти среднее арифметическое квадратов введенных чисел 2) с клавиатуры вводятся натуральные числа a и n. Написать программу вычисления a в степени n.
Ответы (1)
Последовательно вводятся целые положительные числа, пока не будет введено отрицательное число. Определить разность между суммой чисел кратных семи и количеством четных чисел.
Ответы (1)