Есть ответ 👍

Задание по VBA excel.

121
166
Посмотреть ответы 1

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


Var   a,b: array[1..7]of integer;   i: integer; begin for i: =1 to 7 do  a[i]: =random(15)+1; b[1]: =a[7];     for i: =2 to 7 do  b[i]: =a[i-1]; for i: =1 to 7 do    writeln(a[i]: 4,b[i]: 4); end.  

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