Регистрация
ДжулиТян
20.06.2023 07:08
Информатика
Есть ответ 👍

Решить по pascal abc, цикл while. c клавиатуры вводится число, ввод заканчивается числом 500. сколько чисел делится на 3?

191
312
Посмотреть ответы 2

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

яяяяяя60
яяяяяя60
4,5(5 оценок)
Var col,ch: integer; begin writeln('введите числа, закончив ввод числом 500  '); while (ch< > 500) do begin readln(ch); if ch mod 3 =0 then col: =col+1; end; writeln('количество чисел кратных трём =  ',col); end.
babywka56
babywka56
4,8(34 оценок)

Объяснение:

мощность алфавита не зависит от конкретных символов а зависит только от их количества. Если в алфавите 6 символов - то его мощность и будет равна 6

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