98

Вводятся 5 целых чисел вывести количество отрицательных

artem6378 27 февраля 2023

Вводятся 5 целых чисел вывести количество отрицательных. Помогите плизз!

категория: информатика

39

var a: array [1… 100] of integer; i, n, k: integer; begin n: =5; for i: =1 to n do begin read (a[i]); if a[i] < 0 then k: =k+1; end; write (k); end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...