В таблице 15*15 найти и вывести положительные элементы лежащие ниже главной диагонали

@Дмитрий 67 · Регистрация: 16.10.2019

В таблице 15*15 найти и вывести положительные элементы лежащие ниже главной диагонали.

@Puporev · 21.10.2019, 14:01

Pascal

n=15;
....................
for i:=2 to  n do
for j:=1 to i-1 do
if a[i,j]>0 then write(a[i,j],' ');

@Дмитрий 67 0 / 0 / 0 Регистрация: 16.10.2019 Сообщений: 6
		1
	В таблице 1515 найти и вывести положительные элементы лежащие ниже главной диагонали 21.10.2019, 13:34. Показов* 764. Ответов 1 Метки нет (Все метки) В таблице 15*15 найти и вывести положительные элементы лежащие ниже главной диагонали. 0

	21.10.2019, 14:01