Задание
Что будет выведено на экран при вводе предполагаемых значений?
{6 5 9 5 9 3 4 1 1 9 1 1 0}
var a,k,n,x,max:integer;
s:real;
begin
k:=0; n:=0; max:=0;
repeat
n:=n+1;
readln\(x\);
if x>=max then
begin
max:=x;
k:=n;
end;
until \(x =0\) or \(n=10\);
writeln\(n,' ',k,' ',max\);
end.