Язык Pascal. Ввести х целых чисел. Найти количество чисел, которые кратны трем(делятся на 3).
Язык Pascal.
Ввести х целых чисел. Найти количество чисел, которые кратны трем(делятся на 3).
Ответ(ы) на вопрос:
Программа на паскале внизу
{ввод массива z}
...
for i:=1 to x do
if z[i] mod 3 = 0 then k:=k+1;
...
вывод k
Не нашли ответ?
Похожие вопросы