ПАСКАЛЬ 1) В двумерном массиве 4 на 3 заменить все нулевые элементы…

Question

ПАСКАЛЬ 1) В двумерном массиве 4 на 3 заменить все нулевые элементы на первый элемент матрицы. 2) Заменить все элементы главной диагоналина максимальный элемент той же строки

Answer 1

55

yanis

06 марта 2023

var a: array[1… 20,1… 20]of integer; i,j: integer; beginfor i: =1 to 4 dofor j: =1 to 3 doreadln (a[i,j]); for i: =1 to 4 dofor j: =1 to 3 doif a[i,j]=0 then a[i,j]: =a[1,1]; for i: =1 to 4 do beginfor j: =1 to 3 dowrite (a[i,j],'); writeln; end; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: