Опубликовано 03.01.2018 по предмету Информатика от Гость

Дана матрица размера M × N. Найти
минимальный среди элементов тех строк, которые упорядочены либо по
возрастанию, либо по убыванию. Если упорядоченные строки в матрице отсутствуют,
то вывести 0.

Дана матрица размера M × N. Упорядочить ее
строки так, чтобы их минимальные элементы образовывали убывающую
последовательность.

Помогите решить в Pascal ABC. Хотя бы одну

Ответ оставил Гость

Задача № 1)
Код программы получился довольно таки большой , но можно сам файл *.pas Закинуть в интернет и оттуда скачать.
Задача №2)

uses crt;
var m:array[1..100,1..100] of integer;
    i,i1,j,str,stb,temp:integer;
begin
clrscr;
writeln(Пожалуйста введите число строк массива: ); readln(str);
writeln(Пожалуйста введите число Столбцов массива: ); readln(stb);
clrscr;
writeln(Массиа из ,str, строк, и из ,stb, столбцов успешно создан!);
writeln;
for i:=1 to str do
begin
     for j:=1 to stb do
     begin
     m[i,j]:=random(80)+1;
     write(m[i,j]:3,  );
     end;
     writeln;
end;
writeln;
writeln( отсортирован по убыванию);
writeln;
for i1:=1  to str do
    for i:=1 to str-1 do
    for j:=i+1 to str do
    if m[i1,i]writeln;
for i:=1 to str do
begin
     for j:=1 to stb do
     begin
     write(m[i,j]:3,  );
     end;
     writeln;
end;
readkey;
end.
Запускаешь водишь строк и столбцов после нажимаешь Enter программы сделает своё дело

Не нашел нужный ответ?

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.


Найти другие ответы
Самые новые вопросы