Заполнить массив из 5 элементов случайными числами , а затем увеличить каждый элемент в два раза и повторно вывести на экран.
Решите пожалуйста!
Ответы
Ответ дал:
0
const n=5;
var
i: integer;
var a: array[1..n] of integer;
begin
writeln ('Исходный массив');
for i:=1 to n do begin
a[i]:=random(10);
write (a[i]:3);
a[i]:=2*a[i];
end;
writeln;
writeln ('Новый массив');
println (a);
end.
-----------------------------------
Исходный массив
9 4 7 7 2
Новый массив
18 8 14 14 4
var
i: integer;
var a: array[1..n] of integer;
begin
writeln ('Исходный массив');
for i:=1 to n do begin
a[i]:=random(10);
write (a[i]:3);
a[i]:=2*a[i];
end;
writeln;
writeln ('Новый массив');
println (a);
end.
-----------------------------------
Исходный массив
9 4 7 7 2
Новый массив
18 8 14 14 4
Вас заинтересует
5 лет назад
5 лет назад
8 лет назад
8 лет назад