Дана программа. Определить результат выполнения. program N02;
const A: array [1..6] of integer = (16,1,8,2,4,4);
var i,k: integer;
begin
k:=0;
for i:=2 to 6 do
if A[i-1]>=A[i] then k:=k+1;
write(k)
end.

lyisa    1   06.12.2020 11:46    110