информатика1ё / Лаб4-1 / Вар9
.docЛабораторная работа № 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
КОНЕЦ