Дан входной файл в котором нужно вывести все четные элементы.

Ответы:

Станислав Чеботько

15-11-2018 00:23

Var a:array [1..10] of integer; I:integer; Begin For i:=1 to 10 do begin Read (a [i]); If a[i]>0 then writeln (a [i]); End; end.

Также наши пользователи интересуются:

Укажите вид рифмы ( А. Ахматова "Перед весной бывают дни такие...")В коробки упаковали жвачки по 25 штук в каждую. сколько жвачек останется, если нужн?

Картинка с текстом вопроса от пользователя Оксана Денисенко

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Дан входной файл в котором нужно вывести все четные элементы.» от пользователя Оксана Денисенко в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!