Регистрация
ayselhasilova
10.06.2022 07:43
Информатика
Есть ответ 👍

А где ответы?,???????????

106
309
Посмотреть ответы 3

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

olysenko290
olysenko290
4,4(99 оценок)

Какие ответы???????

тут нет нечего что бы отвечать

elizavetdu04
elizavetdu04
4,5(27 оценок)

какие ответы мне и я тебе чесно

maxim880055535351
maxim880055535351
4,7(57 оценок)
Var a: array[1..7,1..7] of byte; begin for var i: = 1 to 7 do     begin     for var j: = 1 to 7 do           begin           if (8-i = j) then a[i,j]: = j           else a[i,j]: =0;           write(a[i,j])           end;     writeln     end; end.

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