Выведите символы, у которых код нечетное число и чётное число - Pascal ABC

Формулировка задачи:

1)Выведите символы,у которых код нечетное число и чётное число. 2)Напечатайте в ряд символы с кодами от 0 до 9 Помоги, пожалуйста, решить задачи

Код к задаче: «Выведите символы, у которых код нечетное число и чётное число - Pascal ABC»

textual
For i:=1 to 9 do
 if a[i] mod 2 =0 then
 begin
 p:=p+1;
B[p]:=A[i];
end;

11   голосов, оценка 4.182 из 5


СОХРАНИТЬ ССЫЛКУ
Похожие ответы