ТутРешу.Ру

1) заполните масив случайными числами от -10 до 20 элементов…

Задание:

1) заполните масив случайными числами от -10 до 20 элементов в массиве 10 вывести на экран в строку через точку сзапятой 2)

Решение:

Var tarray: array[1… 10] of integer; i: byte; beginfor i: =1 to 10 dobegin tarray[i]: =random (30) -10writeln (tarray[i], '; '); end; end.




Знаете другой ответ?

Отправить свой ответ