Заполнить массив из 5 элементов случайными числами из интервала от -15 до 15, вывести **...

Question

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

Помогите, пожалуйста!

Comments

Начал делать.

---

Принято.

Answer 1

Готово. Решение в файле. Если будут вопросы, пиши ниже.

Comments

Спасибо большое!

Answer 2

Вот. program pr; var a:array[1..5] of integer;i:integer; begin randomize; for i:=1 to 5 do a[i]:=-15+random(31); for i:=1 to 5 do write(a[i]:4); writeln(); for i:=1 to 5 do a[i]:=a[i]*2; for i:=1 to 5 do write(a[i]:4); end.