Регистрация
просмь
16.06.2020 18:54
Информатика
Есть ответ 👍

№ 5. Напишите программу, которая по двум натуральным числам аиь подсчитывает количество натуральных чисел, не
кратных 3, на отрезке [a,b].
Пример работы программы:
Входные данные7,37
Выходные данные21

141
179
Посмотреть ответы 1

Ответы на вопрос:

Kinder2571
Kinder2571
4,6(86 оценок)
Var a,n,k: integer; begin write('n = '); readln(n); write('введите целые числа(',n,' шт.): '); k: =0; for n: = 1 to n do       begin       read(a);       if a mod 2 = 0 then k: =k+1       end; writeln('кол-во чётных чисел: ',k) end.

Популярно: Информатика