Программирование на Pascal / Delphi

Экзамен. г.Пермь ПФ МЭСИ (Пермский филиал Московского государственного университета экономики, статистики и информатики), 2011-2012 год. Обратите внимание на 8секций(листов) в файле. После выполнения операторов: Const n=10; A:array[ 1.n] of byte=(2,1,0,3,5,0,4,3,5,7); Var k,I:byte; Begin K:=0; For I:=1 to n do If a[I]=0 then k:=I; Writeln(k) End. Адекватность информации может...