информатика1ё / лаб4-2 / вар12

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

PRINT

NEXT I

END

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

НАЧАЛО

I = 1

J = 1

Ввод

нет

Да

Печать

J = J + 1

Да

нет

I = I + 1

Да

нет

КОНЕЦ