информатика1ё / Лаб4-1 / Вар9

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

Найти:

Вариант 9

Сумму всех отрицательных

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

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)

IF X(I) <0 THEN S = S + X(I)

NEXT I

PRINT “ S = “; S

END

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

НАЧАЛО

S = 0

I = 1

Ввод

<0 ДА

НЕТ

I = I + 1

Да

нет

ПЕЧАТЬ S

КОНЕЦ