PASCAL ABC Символьный тип данных. Вывести на экран все латинские буквы, коды которых чётные и кратны 5
PASCAL ABC Символьный тип данных.
Вывести на экран все латинские буквы, коды которых чётные и кратны 5
Гость
Ответ(ы) на вопрос:
ГостьVar C:char;
Begin
For C:='a' to 'z' do
if Ord(C) mod 10 = 0 then WriteLn(C);
For C:='A' to 'Z' do
if Ord(C) mod 10 = 0 then WriteLn(C)
End.
Не нашли ответ?
Похожие вопросы