Программа формирует из 12 случайных целых чисел из промежутка [1, 6]. преобразовать массив, увеличив каждый элемент в два раза и вывести на экран исходный и преобразованный массив.

Ками5 Ками5    1   30.09.2019 06:01    0

Ответы
NastyaVait3 NastyaVait3  09.10.2020 04:47

var a:array [1..12] of integer;

i:integer;

begin

for i:=1 to 12 do a[i]:=random(6)+1;

writeln(a);

for i:=1 to 12 do a[i]:=a[i]*2;

writeln(a)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика