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

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

Найти:

Вариант 6

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

DIM X(10), Y(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

S = 0

FOR I = 1 TO 10

READ X(I), Y(I)

S = S + (X(I) - Y(I))^2

NEXT I

PRINT “ S = “; S

END

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

НАЧАЛО

I = 1

S = 0

Ввод

I = I + 1

Да

нет

ПЕЧАТЬ S

КОНЕЦ

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