Ответ:
N:=0;
for i:=1 to 50 do begin
write(‘x[‘,i,’]=’); readln(x);
if x<0 then N:=N+1;
end;
writeln(‘N=’,N);
Похожие вопросы и ответы:
- Нужна схема в visio(просто блок схема) одна цикл с…
- Суммарная масса сосуда с подсолнечным маслом mм= 5 кг. К…
- 1. Запиши выражения и найди их значения. Увеличить в а раз…
- Одной из отрицательных последствий власти Орды: - ответ на…
- Найдите три отрицательных последствия власти Орды. - ответ…
- у Саши есть конфеты: 6 мятных, 8 лимонных и 4 вишнёвых. Саша…
- 42) (А. Куканова) Рассматривается множество целых чисел,…
- Даны три четырёхзначных числа. Если в них все нечётные цифры…
- 14.10.22Контрольная работа 1 по теме " Тригонометрические…
- составить 2 сложных предложения сделать схему - Правильный…
- Военный блок, в который входили Германия, Австро-Венгрия и…
- Первоначально входило в блок НАТО, вошло это государство: -…
- Какие государства вошли в блок Антанты в начале ХХ века: -…
- Какое государство первоначально входило в блок НАТО: - ответ…
- Кто не входил в военно-политический блок «Антанта»: - ответ…
Источник znanija.site