Вариант №4 1. Опишите каждый фрагмент программы на естественном языке:
a) Var D: array[1..9] of integer;
b) for i:=1 to 9 do D[i]:=random(12)-3;
c) for i:=1 to 9 do write (CDr, i, j=", D[i]););
d) for i:=1 to 9 do if D[i] mod 3 =0 then s:=s+D[i];
e) for i:=1 to 5 do if D[i]<>0 then k:=k+1;