Задача по паскалю. Символьный тип данных Вывести на экран все цифры коды которых кратны 3
Задача по паскалю. Символьный тип данных
Вывести на экран все цифры коды которых кратны 3
Ответ(ы) на вопрос:
Var
C:char;
Begin
For C:='0' to '9' do
if Ord(C) mod 3 = 0 then
WriteLn(C)
End.
Не нашли ответ?
Похожие вопросы