Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
semenem15
31.10.2022 14:17 •
Информатика
Дано a и b написать программу которая подсчитывает сколько среди них меньше нуля
Показать ответ
Ответ:
JanaKay
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 оценок)
Популярные вопросы: Информатика
jumaev1998
21.08.2020 09:24
1. Сформулируй правила записи арифметических действий на языке программирования.2. Какие приоритеты имеют арифметические действия при их выпа-нении?3. Почему важно соблюдение правил...
79134523121
18.10.2020 23:08
PYTHON 3 Вася захотел сделать на Новый год особую гирлянду. В его гирлянде N цветных шариков. Вася хочет запрограммировать работу гирлянды так, чтобы шарики загорались поочередно...
2008031
26.05.2021 23:55
4. Дописать предложение Таблица состоит Форматирование Электронная таблица Автозаполнение ...
consenttime
17.01.2020 03:28
Программирование на Python ТЕМА: Работаем с циклами БЫСТРО И БОЛЬШЕ. Переменная value = 100 хранит в себе значение, равное 100. В цикле while каждый раз пользователю предлагается...
664565465
01.02.2023 22:40
Ниже на языке программирования Pascal записан алгоритм, который получает на вход число X и печатает два числа a и b: var x, a, b: integer; begin readln(x); a:=0; b:=1; while (x mod...
dschunchewa2013
22.03.2020 01:26
Красивые числа. Дано два списка различных ненулевых цифр. Будем считать число красивым, если в его записи присутствует хотя бы одна цифра из первого списка и хотя бы одна цифра из...
esina3010
11.05.2022 03:39
Написать программу на языке с++ или java или pascal или python.вводятся два символа некоторого алфавита, вероятности их появления и составления из них произвольная последовательность,...
AzazaMen
06.01.2022 22:56
Напишите программу, которая в последовательности целых чисел определяет их сумму и подсчитывает разность количества положительных и отрицательных чисел последовательности. программа...
sotela546hgjUlia
20.01.2020 22:40
0и 1, обозначающие значения логических переменных, называются: числовое выражение логическое выражение свойства переменной побудительное предложение...
nastyaswan1405
09.02.2022 06:17
Это информатика 9 класс. составить таблицу истинности...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.