Подсчитать количество отрицательных чисел среди a,b,c
ЕжикТумыный
2
20.05.2019 21:50
1
Другие вопросы по теме Информатика
daniil6092002
03.06.2021 08:27
nastya06nastik
03.06.2021 08:41
olenina051
26.11.2020 12:30
enigma75
26.11.2020 12:30
Pelmen891
30.07.2019 15:20
Werty0183
30.07.2019 15:20
аня2938
21.05.2019 04:50
Aydan204
21.05.2019 04:50
Популярные вопросы
- Тема исследовательской работы 4 класс? цель исследования? ? гипотеза?...
3 - Решите неравенство -4 3х+2 6...
3 - Укажи соответствие между защитным свойством организма человека и видом...
3 - Биология быстрее 1.рецесивний ген визначає чорне забарвлення тіла дрозофіла,...
1 - Как определить плотность древесины в карандаше? нужно,от этого зависит...
2 - :проверить текст на пунктуационные ошибки ( запятые, расположение знаков...
1 - Функция задана формулой y = x * (3 - x). если x = -2 , то y = -3 * ())...
2 - Функция задана формулой y = - x² + 2.заполните таблицу : x | -4 | -3...
1 - Нужна найдите значение выражения 7b+2a-7b^2/b при a=3√3, b=√12...
3 - Нужна найдите значение выражения 7b+2a-7b^2/b при a=3√3, b=√12...
1
это паскаль или что если он то .
program prog;
var a,b,c,i:integer;
begin
Writeln('Введите 3 числа');
Readln(a,b,c);
if a<0 then i:=i+1;
if b<0 then i:=i+1;
if c<0 then i:=i+1;
writeln('Количество отрицательных чисел: ',i);
end.