Выведите на экран все четные элементы массива - Pascal ABC

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

11. Создайте одномерный массив, в который пользователь введет с клавиатуры значения элементов. Выведите на экран значения элементов массива. Выведите на экран все четные элементы массива.

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

textual
...
for i:=1 to n do
 readln(a[i]);
for i:=1 to n do
  if a[i] mod 2=0 then 
    write(a[i],'  ');
...

10   голосов, оценка 4.100 из 5


СОХРАНИТЬ ССЫЛКУ