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