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

Лабораторная работа № 4.1

Даны два массива

-0,1

0,05

0,7

0,8

-1,5

0,2

0,4

-1

0,1

1,5

0,1

0,3

-0,9

0,2

-0,4

0,01

1

-0,25

-0,1

-0,3

Найти:

Вариант 3

Наименьший элемент массива х(i)

Составляем программу

DIM Х(10)

DATA -0.1, 0.05, 0.7, 0.8, -1.5

DATA 0.2, .4, -1, 0.1, 1.5

FOR I = 1 TO 10

READ Х(I)

NEXT I

Min = X(1)

FOR I =2 TO 10

IF X(I) < MIN THEN MIN = X(I)

NEXT I

PRINT “ MIN=”; MIN

END

Составляем блок-схему:

НАЧАЛО

I = 1

Ввод

I = I + 1

Да

нет

MIN = X(1)

I = 2

Да

X(I) < MIN MIN = X(I)

нет

I = I + 1

Да

нет

ПЕЧАТЬ MIN

КОНЕЦ

Соседние файлы в папке Лаб4-1