Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
33
Добавлен:
01.04.2014
Размер:
243.58 Кб
Скачать

i

Начало

Ввод n

i=0

i<n

Ввод a[i]

++i

Ввод t1

Ввод t2

a[i]>t1

i=0

i<n

++ii

i

++i

ii!=0

2

j=0

a[i]>t1

i=0

i<n

b[j]=a[i]

++j

i

++i

3

Нет элементов > t1

2

1

i=0

i<ii

t2==b[i]

i!=ii-1

el1=1

el1=0

3

el2=0

el2=1

pos1=i

i

++i

el1==0

Нет элементов = t2

4

el2==0

5

t2 последний элем.

min=b[0]

i=pos1

i<ii

6

6

min>b[i]

min=b[i]

i

++i

Вывод min

1

5

4

Конец

9

Соседние файлы в папке ОКП КР1 Вар28