1) заполните массив q [7] случайными числами в - вопрос №1045701617621 от kad132 07.12.2022 11:20

Question

Информатика: 1) заполните массив q [7] случайными числами в интервале от 6 до 21. вывод - в строку через пробел. 2) заполните массив a первыми n натуральными числами, начиная с x (ввести x с клавиатуры). вывод - в строку через пробел.

kad132 · Answer

===== PascalABC.NET =====begin  var Q := ArrRAndom(7, 6, 21);  Q.Println;  var (N, X) := ReadInteger2( Введите N и X: );  var A := ArrGen(N, i - i + 1, X - 1);  A.Printlnend....