FindSlide.org - это сайт презентаций, докладов, шаблонов в формате PowerPoint.
Email: Нажмите что бы посмотреть
import random
M=[]
for i in range(10):
M.append(random.randint(-50,50))
print(M)
M.sort()
print(M)
var
M: array [1..10] of integer;
i,j: byte;
tmp: integer;
begin
randomize;
for i:= 1 to 10 do
begin
M[i]:=random(100)-50;
write(M[i],' ');
end;
for i:= 1 to 10-1 do
for j:=i+1 to 10 do if M[i]>M[j] then
begin
tmp:=M[i]; M[i]:=M[j]; M[j]:=tmp;
end;
writeln;
for i:= 1 to 10 do write(M[i],' ');
end.