File Ed it^SearcTi
ma
■ i - ■ ■ ogran lal;
Run Conplle Dębu
T oo 3
uotTor
parzytte.iwu
r tab:array[ .. 1 o# integer;
i:integer; gin
clrtcr;
for i:* to do
if <i nod > * then writeln Ci # # — podzieliła el*e «ritelnCi>; readln:
9