Задача по Паскалю. Дан двумерный массив: a: array[1… 5,1…

Question

Задача по Паскалю. Дан двумерный массив: a: array[1… 5,1… 5] of integer. Все нечетные столбцы сделать единичными, вывести ответ в видетаблицы.

Answer 1

92

vladius

31 июля 2022

Var a: array[1… 5,1… 5] of integer; i,j: integer; Begin randomize; for i: =1 to 5 do for j: =1 to 5 do a[i,j]: =random (9)+1; for j: =1 to 5 do for i: =1 to 5 do if (j mod 2) <>0 then a[i,j]: =1; for i: =1 to 5 do begin for j: =1 to 5 do write (a[i,j]: 3); writeln; end; End.

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

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

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

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

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