Kod: Zaznacz cały
Program ciag;
var n:integer
procedure sortowanie(i:integer);
begin
writeln('podaj ilość liczb');
readln(n);
for i:=1 to n do
Kod: Zaznacz cały
Program ciag;
var n:integer
procedure sortowanie(i:integer);
begin
writeln('podaj ilość liczb');
readln(n);
for i:=1 to n do