👤

Se citesc n numere naturale. Sa se
tipareasca valoarea maxima citita.
pseudocod


Răspuns :

var a, k, i, max : integer;

begin

read(k);

max := 0;

for i := 1 to k do

begin

    read(a);

    if max >= a then

       max := a;

end;

end