Предмет: Информатика,
автор: Archiriver
дан двумерный массив состоящих из целых чисел вывести на экран массив так чтобы в каждой его строке числа выводились в порядке возрастания
срочно
Ответы
Автор ответа:
0
// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
Writeln('*** Исходный массив ***');
var a:=MatrRandom(m,n,-99,99);
a.Println(4); Writeln(4*a.ColCount*'-');
a.Rows.ForEach(r->begin
r.OrderBy(t->t).Select(t->Format('{0,4}',t)).JoinIntoString('').Println
end)
end.
// Внимание! Если программа не работает, обновите версию!
begin
var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
Writeln('*** Исходный массив ***');
var a:=MatrRandom(m,n,-99,99);
a.Println(4); Writeln(4*a.ColCount*'-');
a.Rows.ForEach(r->begin
r.OrderBy(t->t).Select(t->Format('{0,4}',t)).JoinIntoString('').Println
end)
end.
Приложения:
Похожие вопросы