Элементы массива, равные ноль, заменить ** 1. Как это записать в Паскале?

Question

Элементы массива, равные ноль, заменить на 1. Как это записать в Паскале?

Comments

for i:=1 to n do

---

if a[i]=0 then a[i]:=1;

Answer 1

Для 10 элементов

for i:=1 to 10 do
if a[i]=0 then a[i]:=1;