Дана программа. Определить результат выполнения.


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.
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Copyright © 2024 SCHOLAR.TIPS - All rights reserved.