Регистрация
soloveyandrey3
11.07.2020 18:48
Информатика
Есть ответ 👍

SKETCHUP кемшіліктері​

120
395
Посмотреть ответы 1

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

тимур624
тимур624
4,4(57 оценок)
A: array[1..10] of integer; i: integer begin randomize; for i: =1 to 10 do begin a[i]: =random(9)+1; end; for u: =1 to 10 do begin write(a[u]) a[u]: =b[u] end; a[1]: =b[2]; a[2]: =b[1]; a[3]: =b[4]; a[4]: =b[3]; a[5]: =b[6]; a[6]: =b[5]; a[7]: =b[8]; a[8]: =b[7]; a[9]: =b[10]; a[10]: =b[9]; write(a[1],a[2],a[3],a[4],a[5],a[6],a[7],a[8],a[9],a[10]); end. как вариант: )

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