Определите, что будет выведено в результате выполнения следующей программы: program m1;
var i, k: integer;
a: array [1..10] of integer;
begin
for i:= 1 to 10 do a [ i ]: = i - 5;
k:= 0;
for i:= 1 to 10 do
if a [ i ]>=0 then k:= k + 1;
writeln (‘k= ‘, k)
end.

Школа221111    3   11.12.2020 12:03    12