Написать программу: найти минимальный среди положительных элементов массива. Интервал: от...

0 голосов
32 просмотров

Написать программу: найти минимальный среди положительных элементов массива. Интервал: от -20 до 150


Информатика (107 баллов) | 32 просмотров
0

Паскаль нужен

Дан 1 ответ
0 голосов

Пишу на QBasic
массив создан и заполнен
PRINT "Введите количество элементов массива"
INPUT N
MIN= 150
FOR I = 1 TO N
IF I  0 THEN
MIN = I
END IF
NEXT I 
PRINT MIN

(1.2k баллов)
0

да говорю ж, Паскалем надо