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

Лабораторная работа № 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

Найти:

Вариант 12

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

DIM X(10), Y(10), Z(10)

DATA -0.1, 0.1, 0.05, 0.3, 0.7, -0.9, 0.8, 0.2, -1.5, -0.4

DATA 0.2, 0.01, 0.4, 1, -1, -0.25, 0.1, -0.1, -1.5, -0.3

FOR i = 1 TO 10

READ X(i), Y(i)

IF X ( i ) <Y(i) THEN Z(i) = COS (X (i) ^ 2 + 2 * Y(i))

IF X (i) > = Y(i) THEN Z(i) = EXP ( - ABS (Y(i) + X(i)))

PRINT “Z(i) “; Z(i)

NEXT i

END

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

НАЧАЛО

I = 1

Ввод

Да

нет

Да

нет

I = I + 1

Да

нет

ПЕЧАТЬ Z

КОНЕЦ

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