Сортировка массива по убыванию
Объяснение:
type
massiv = array [1..10] of integer;
var
mass : massiv;
i , j , n , b: integer;
begin
randomize;
write('Введите длину массива : ');readln(n);
for i:=1 to n do
mass[i] := random(10);
write(mass[i], ' ');
end;
for i:=1 to n-1 do
for j:=1 to n-i do
if (mass[j] < mass[j+1]) then
b := mass[j];
mass[j] := mass[j+1];
mass[j+1] := b;
writeln;
readln;
end.
Вот. Вообще всё было неправильно, кроме 1 строчки. Нельзя в условиях просто писать две переменные.
m1,m2,m3= map(int,input("Введите массы трёх толстяков, разделённые пробелами. ").split())
if 94 > m1 or 94 > m2 or 94 > m3 or 727 < m1 or 727 < m2 or 727 <m3 :
print("Error")
elif m1 > m2 and m1 > m3:
print("m1 = ", m1)
elif m2 > m1 and m2 > m3:
print("m2 = ", m2)
elif m3 > m1 and m3 > m2:
print("m3 = ", m3)
else:
print("m2==m3==m1 = ", m1)
Сортировка массива по убыванию
Объяснение:
type
massiv = array [1..10] of integer;
var
mass : massiv;
i , j , n , b: integer;
begin
randomize;
write('Введите длину массива : ');readln(n);
for i:=1 to n do
begin
mass[i] := random(10);
write(mass[i], ' ');
end;
for i:=1 to n-1 do
for j:=1 to n-i do
begin
if (mass[j] < mass[j+1]) then
begin
b := mass[j];
mass[j] := mass[j+1];
mass[j+1] := b;
end;
end;
writeln;
for i:=1 to n do
write(mass[i], ' ');
readln;
end.
Вот. Вообще всё было неправильно, кроме 1 строчки. Нельзя в условиях просто писать две переменные.
Объяснение:
m1,m2,m3= map(int,input("Введите массы трёх толстяков, разделённые пробелами. ").split())
if 94 > m1 or 94 > m2 or 94 > m3 or 727 < m1 or 727 < m2 or 727 <m3 :
print("Error")
elif m1 > m2 and m1 > m3:
print("m1 = ", m1)
elif m2 > m1 and m2 > m3:
print("m2 = ", m2)
elif m3 > m1 and m3 > m2:
print("m3 = ", m3)
else:
print("m2==m3==m1 = ", m1)