Vieta: Riigas Laukjene
Notikums: Kedu party

noraava seju - lii & sady - pusotrs litrs chuuskas


{lietotaajs izveido programmu kas liek piepildiit masiivu no 1 liidz 100 ar
gadiijuma skaitliem dators atrod lielako bet neizvada, liek lietotajam mineet
tikai izvada norades par skaitla intevaalu.}
program maxim;
const max=100;
var
a: array[1..max] of integer;
x,s,y,i: integer;
begin
randomize;
y:=0;
for i:=1 to max do
a[i]:=random(99)+1;
s:=a[1];
for i:=2 to max do
if a[i]> s then s:=a[i];
writeln (' mini nu!');
repeat
readln(x);
if x>s then writeln('par daudz');
if x .....{turpinaajums sekos}