Регистрация
Мне0нужна0помощь
07.07.2021 02:29
Информатика
Есть ответ 👍

Создать массив случайных чисел y[1..10,1..10]. все элементы массива, расположенные ниже главной диагонали сделать равными -1.

214
448
Посмотреть ответы 2

Ответы на вопрос:

Haker2216
Haker2216
4,8(7 оценок)

var y: array [1..10,1..10] of integer;

i,j: integer;

begin

randomize;

for i : = 1 to 10 do begin

for j : = 1 to 10 do begin

y[i,j] : = random(100);

end;

end;

 

for i : = 1 to 10 do begin

for j : = 1 to 10 do begin

if (j < i) then y[i,j] : = -1;

end;

end;

end.

 

извиняюсь, что столько раз исправлял - просто паскаль уже не помню ))

SamaraArtem24
SamaraArtem24
4,6(36 оценок)

16 - A = 6

Объяснение:

F A 0

E E A

0    B      6

B6

Популярно: Информатика