Регистрация
Войти
Стать экспертом Правила
Информатика

Заполнить массив из 5 элементов случайными числами , а затем увеличить каждый элемент в два раза и повторно вывести на экран.
Решите пожалуйста!

ОТВЕТЫ
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

85
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам