Использование частных случаев в условиях. Флаг в задачах Задача. Определить место первого четного элемента в массиве. - презентация

1 Использование частных случаев в условиях

2 Флаг в задачах Задача. Определить место первого четного элемента в массиве

3 Программа: const n=10; Var m:array[1..n]of integer ; f:integer; pch:integer; Begin { заполнить и вывести исходный массив } i:=1; f:=0; {значения элементов нечетные} while ( i<=n ) and (f=0) do if not odd(m[i]) then f:=1 {нашли четное значение} else i:=i+1; writeln; pch:=i; write(место первого четного -,pch) ; End.

4 Проверка на упорядоченность Задача. Проверить, упорядочен ли массив по возрастанию

5 Программа: const n=10; Var m:array[1..n]of integer ; f:integer; pch:integer; Begin { заполнить и вывести исходный массив } i:=1; f:=0; {упорядочен} while ( im[i+1] then f:=1 {не упорядочен} else i:=i+1; writeln; if f=0 then write(упорядочен ) else write(нет) ; End.End.