Дан массив из 8 элементов 4: -2: -4: 0: 2: 3: 1: 5 найти позицию элемента равного двум

Исбанка Исбанка    3   28.08.2019 20:30    0

Ответы
ilyaska10 ilyaska10  26.08.2020 11:42
Массив заполнен сразу

const a: array[1..8] of integer=(4,-2,-4,0,2,3,1,5);
var i:integer;
begin
for i:=1 to 8 do
if a[i]=2 then writeln('Pozitciya elementa ravnogo 2 = ',i);
end.

Массив заполняется с клавиаутры

var
a: array[1..8] of integer;
i:integer;
begin
for i:=1 to 8 do
readln(a[i]);
for i:=1 to 8 do
if a[i]=2 then writeln('Pozitciya elementa ravnogo 2 = ',i);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика