Дан двумерный массив целых чисел 5x5. Заменить числа меньше 7 их

Дан двумерный массив целых чисел 5x5. Заменить числа меньше 7 их квадратами. Паскаль

Задать свой вопрос
1 ответ
PascalABC.NET 3.4.0, сборка 1675 от 12.06.2018
Внимание! Если программка не работает, обновите версию!

begin
  var n:=5;
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(n,n,-30,99);
  a.Println(4); Writeln(4*n*'-');
  a.Transform(t-gt;tlt;7?t*t:t);
  Writeln('*** Приобретенный массив ***'); a.Println(4)
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт