информатика1ё / лаб4-2 / вар8
.docЛабораторная работа № 4.2
Дан массив
Найти:
Вариант 8
Сумму всех отрицательных
Составляем программу
DIM С(5,5)
DATA -0.1, -0.05,0.7, 0.8, -1.5
DATA 0.2, 0.4, -1, 0.1, -1.5
DATA 2, 4, 5, 6,-10
DATA 7, 3.4, -10.7, 3, -2
DATA 2.4, -5.6, 7, 8, -2.7
S = 0
FOR I = 1 TO 5
FOR J = 1 TO 5
READ C (I, J)
IF C ( I, J) < 0 THEN S = S + C (I, J)
NEXT J
NEXT I
PRINT “ S = “; S
END
Составляем блок-схему:
НАЧАЛО
S = 0
I = 1
J = 1
Ввод
<0 нет
Да
J = J + 1
Да
нет
I = I + 1
Да
нет
ПЕЧАТЬ S
КОНЕЦ