Given an array of 15 numbers, fill it with random numbers.
August 4, 2021 | education
| 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.