Задача по паскалю. Символьный тип данных

Вывести на экран все цифры коды которых кратны 3

Question

Наталий

31 октября, 18:32

+2

Ответы (1)

Знаешь ответ?

Зоя · Answer 1

Var

C:char;

Begin

For C:='0' to '9' do

if Ord (C) mod 3 = 0 then

WriteLn (C)

End.

Задача по паскалю. Символьный тип данныхВывести на экран все цифры коды которых кратны 3