С клавиатуры вводится число Х. Заполните массив 10 элементами, в котором первый элемент равен числу Х, а каждый следующий в 2 раза больше предыдущего. const n=10; var a:array [1..n] of integer; i,x:integer; begin readln(x); a[1]:=x; for i:=2 to n do a[i]:=a[ ]* ; for i:=1 to n do write (a[i]:6); end.
С клавиатуры вводится число Х. Заполните массив 10 элементами, в котором первый элемент равен числу Х, а каждый следующий в 2 раза больше предыдущего. const n=10; var a:array [1..n] of integer; i,x:integer; begin readln(x); a[1]:=x; for i:=2 to n do a[i]:=a[ ]* ; for i:=1 to n do write (a[i]:6); end.
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Интересные статьи из справочника
Поможем написать учебную работу
Отвечай на вопросы, зарабатывай баллы и трать их на призы.
Подробнее
Подробнее
В строке нужно написать вместо этого a[i]:=a[ ]; это a[i]:=2*a[i-1];