Задание
выводит на экран:
Оператор:
for i:=1 to 20 do
if a
\[i\]
<=0 then writeln \(a⟨0⟩\);выводит на экран:
- цифру 0
- положительные элементы массива a
- ненулевые элементы массива a
- отрицательные и нулевые элементы массива a