Write a program that replaces all numbers in the array with a given number in a one-dimensional array given by keyboard input.
November 26, 2020 | education
| The program is written in Pascal:
Program test;
var a: array [1..10] of integer;
i: integer;
Begin
for i: = 1 to 10 do
begin
writeln (‘Enter number #’ + i);
readln (a [i]);
end;
writeln ();
writeln (‘Result:’);
writeln ();
for i: = 1 to 10 do
begin
writeln (‘Number #’ + i + ‘=’ + a [i]);
end;
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.