Опишите каждый фрагмент программы на естественном языке: 1)Var Z: array[1..15] of integer;
2)for i:=1 to 15 do Z[i]:=random(12)-7;
3)for i:=1 to 15 do write (('Z[', i, ']=', Z[i]););
4)for i:=1 to 15 do if Z[i] 7 then s:=s*Z[i];
Сформулируйте условие задачи, исходя из вышеописанных фрагментов

rufdiana    3   12.01.2021 11:30    13