Помогите с Turbo Pascal.

[pamirs@vk]

Посчитать количество отрицательных чисел среди a, b, c.

[Tonny_Bennet]

Если а меньше нуля тогда счётчик увеличивается на единицу. И так с остальными.