Given an array A [10] whose element values are in the range [-20.5]. Form an array P [10,10], where P [I, J] = 2 * A [I] + J-5

var
P: array [1..10,1..10] of integer;
A: array [1..10] of integer;

begin

for i: integer: = 1 to 10 do
begin
A [i]: = random (25) -20;
write (A [i]: 5);
end;

for i: integer: = 1 to 10 do
begin
for j: integer: = 1 to 10 do
begin
P [i, j]: = 2 * A [i] + j-5;
write (P [i, j]: 5);
end;
writeln ();
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.