Регистрация
Войти
Стать экспертом Правила
Информатика

Запросить массив из5 элементов и определить кол-во отрицательных элементов. (Как надо написать в Pascal)

ОТВЕТЫ

var n:array[1..5] of integer;

var c: integer; 

begin

for i:=1 to 5 do

     if n[i]<0 then c:=c+1;

end.

572
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам