информатика1ё / лаб4-2 / вар12
.docЛабораторная работа № 4.2
Дан массив
Найти:
Вариант 12
Все положительные
Составляем программу
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
FOR I = 1 TO 5
FOR J = 1 TO 5
READ C (I, J)
IF C ( I, J) > 0 THEN PRINT C (I, J);
NEXT J
NEXT I
END
Составляем блок-схему:
НАЧАЛО
I = 1
J = 1
Ввод
нет
Да
Печать
J = J + 1
Да
нет
I = I + 1
Да
нет
КОНЕЦ