дан массив из 8 элементов все его элементы увеличить в 2 раза

Question

Информатика

Доброгнева

29 июня, 11:41

дан массив из 8 элементов все его элементы увеличить в 2 раза

+3

Ответы (1)

Знаете ответ на вопрос?

Ионка · Answer 1

var a:array [1 ... 100] of real;

i, n:integer;

Begin

n:=8;

for i : = 1 to n do begin

read (a[i]) ;

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

end;

for i: = 1 to n do

write (a[i],'') ;

End.