Нужно заполнить целочисленный массив числами 1 - 10. Потом умножить каждый элемент массива на 2 и вывести что получилось на экран

Question

Киряха

24 декабря, 02:35

+1

Ответы (1)

Знаете ответ?

Эдуард · Answer 1

var

mas:array[1 ... 10]of integer;

i:integer;

begin

for i:=1 to 10 do

begin

mas[i]:=i;

mas[i]:=mas[i]*2;

write (mas[i]:3) ;

end;

end.