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

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

Найти:

Вариант 7

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

DIM X(10)

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

DATA 0.2, 0.4, -1, 0.1, -1.5

S = 0

FOR I = 1 TO 10

READ X(I)

S = S + (X(I))^4

NEXT I

D= D^(1/4)

PRINT “ D = “; D

END

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

НАЧАЛО

I = 1

S = 0

Ввод

I = I + 1

Да

нет

ПЕЧАТЬ S

КОНЕЦ

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