Паскаль.массивы напишите программу, которая заполняет - вопрос №1468872 от Medewjik 15.05.2021 21:40

Question

Информатика: Паскаль.массивы напишите программу, которая заполняет случайными числами (из диапазона от -10 до 20) массив a размерностью 15 и выводит его элементы на экран в одну строку.

Medewjik · Answer

var

a:array[1..15] of integer;

i:integer;

begin

randomize;

writeln('Сгенерированный массив:');

for i := 1 to 12 do

begin

a[i] := random(31) - 10;

write(a[i], ' ');

end;

writeln;

end.