Дан массив из 10 элементов. первый элемент равен 2. каждый последующий элемент больше предыдущего в 3 раза. Создать программу которая выведет на экран все элементы значение которых больше 20.

Question

Информатика

Горислава

8 февраля, 21:03

Дан массив из 10 элементов. первый элемент равен 2. каждый последующий элемент больше предыдущего в 3 раза. Создать программу которая выведет на экран все элементы значение которых больше 20.

+3

Ответы (1)

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

Липа · Answer 1

Const N=10 var a:array[1 ... N] of integer; i:integer; begin for i:=1 to N do readln (a[i]) ; a[1]:=2 for i:=2 to N do begin if a[i]>20 then writeln (a[i]*3) ; end; end.