Given an array of 15 numbers, fill it with random numbers.

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

i: integer;

begin

writeln (‘Turn on the random value generator …’);

randomize;

writeln (‘Filling the array with random numbers …’);

for i: = 1 to 15 do a [i]: = random (100);

writeln (‘Displaying an array …’);

for i: = 1 to 15 do writeln (a [i]);

end.



One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.