Как заполнить целочисленный массив случайными числами от -50 до 50 в Паскаль?
Как заполнить целочисленный массив случайными числами от -50 до 50 в Паскаль?
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
const Sz = 50; // Размер массива
var
a: array [1..Sz] of integer;
N: integer; // Количество элементов в массиве
i: integer;
begin
N := 50;
for i:=1 to N do
a[i] := Random(100)-50;
writeln('Элементы массива: ');
for i:=1 to N do
write(a[i],' ');
end.