Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
zozoshcka17
02.11.2022 16:50 •
Информатика
Дано a и b написать программу которая подсчитывает сколько среди них меньше нуля
Показать ответ
Ответ:
nastiya1111machneva
31.07.2020 09:22
Var a,b:integer;
begin
readln(a);
readln(b);
if (a<0) and (b>=0) then writeln('1');
if (b<0) and (a>=0) then writeln('1');
if (a<0) and (b<0) then writeln('2');
if (a>=0) and (b>=0) then writeln('0');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
РОДЯ45
16.09.2022 09:05
Плз найти произведение элементов больше 4 в каждой строке массива e(20, 10), номер которой кратен 5...
Xidirova04
16.09.2022 09:05
4. запишите условный оператор, который выполняет данное действие: вывести в текстовое поле edit1 количество цифр в целом числе а, что на- лежит диапазона от 1 до 999. 5. запишите...
theta4ka
28.04.2023 17:43
По блок-схеме представленной на рисунке 98,решите обратную задачу,определите условие задачи.Проведите трассировку в трассировочной таблице...
EGORchikchik228
08.02.2022 07:10
Сколько раз будет выполнен цикл for n:= 1 to 61 do?...
БейшеналиеваГ
08.11.2021 14:52
3. Пусть элементами равностороннего треугольника являются радиус описанной окружности (R); радиус вписанной окружности (r); сторона (с). Написать программу, которая по соответствующей...
evzrezovatatya
12.01.2020 04:17
1.Как называеться точка с кординатами (0,0)?2.Всегда ли команда сместиться в точку (3, 4) будет выполнена одинаково?3.Запешите параметры в точке А (6,1).Используя команду сместиться...
countrestrikegl
14.05.2022 13:50
Укажите с точностью до десятилетия время к которому относится принятие царского титула российским монархом. укажите российского монарха, чьим регентом была Елена Глинская.приведите...
kris0287
25.07.2020 02:35
Do the test 1. a brother? Have you Do you have Got you2. I like . swim very much very much swimming swimming very much3. She lives the mountains. in at on4. How money do you have?...
natakonstantin
25.07.2020 02:35
Отметь, кто отправился в путешествие к центру Земли. Верных ответов: 2профессор Отто ЛиденброкАкселльгеологи из Германии- НазадВ проверить...
AAOO
25.07.2020 02:35
Площадь прямоугольника АВСD равна 48,синус угла САD равен 3/5.Найдите гипотенузу АВ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a);
readln(b);
if (a<0) and (b>=0) then writeln('1');
if (b<0) and (a>=0) then writeln('1');
if (a<0) and (b<0) then writeln('2');
if (a>=0) and (b>=0) then writeln('0');
end.