СРОЧНО вводятся 14. Чисел. Определить сколько среди них. Положительных и сколько отрицательных

СРОЧНО вводятся 14. Чисел. Определить сколько среди них. Положительных и сколько отрицательных
Гость
Ответ(ы) на вопрос:
Гость
QBasic CLS N=14 DIM A(N) FOR I=1 TO N  INPUT A(I) NEXT I M=0 L=0 IF A(I)>0 THEN M=M+1 PRINT "POL"; M ELSE L=L+1 PRINT "OTR"; L END IF      
Не нашли ответ?
Ответить на вопрос
Похожие вопросы