Дан одномерный массив, состоящий из 20 элементов. Вывести на экран те элементы массива, индексы которых являются степенями двойки (1, 2, 4, 8, 16 ...) Пожалуйста,помогите!!!!! НЕ МОГУ РАЗОБРАТЬСЯ!!!!
Дан одномерный массив, состоящий из 20 элементов. Вывести на экран те
элементы массива, индексы которых являются степенями двойки (1, 2, 4, 8, 16 ...) Пожалуйста,помогите!!!!! НЕ МОГУ РАЗОБРАТЬСЯ!!!!
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
var a:array[1..20] of integer;
for var i:=1 to 20 do a[i]:=Random(-10,35);
Writeln('Исходный массив');
a.Println(',');
Writeln('Элементы с искомыми индексами');
var i:=1;
while i<20 do begin
WritelnFormat('a[{0}]={1}',i,a[i]);
i:=2*i
end
end.
Тестовое решение:
Исходный массив
-8,15,32,25,24,11,18,-2,20,17,15,4,9,30,-10,10,29,31,4,27
Элементы с искомыми индексами
a[1]=-8
a[2]=15
a[4]=25
a[8]=-2
a[16]=10
Не нашли ответ?
Похожие вопросы