Ввести двумерный массив A и заменить все отрицательные элементы на ноль

@junior54 · Регистрация: 21.06.2017

Author24 — интернет-сервис помощи студентам

3. написать программу вводит двумерный массив A(N,M) и заменяет все отрицательные элементы на ноль

@Hitoku · 27.06.2017, 16:58

Pascal

begin
  writeln('Исходный массив:');
  var a := MatrRandom(ReadlnInteger('N ='), ReadlnInteger('M ='), -50, 50).Println;
  writeln('Изменённый массив:');
  a.Transform(v -> v < 0 ? 0 : v);
  a.Println;
end.

@junior54 0 / 0 / 0 Регистрация: 21.06.2017 Сообщений: 4
		1
	Ввести двумерный массив A и заменить все отрицательные элементы на ноль 27.06.2017, 15:01. Показов 1109. Ответов 1 Метки нет (Все метки) 3. написать программу вводит двумерный массив A(N,M) и заменяет все отрицательные элементы на ноль 0

	27.06.2017, 16:58

Ввести двумерный массив A и заменить все отрицательные элементы на ноль

Решение