Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
davvechannel
29.09.2020 16:12 •
Информатика
Дано число. если это число положительное,то вывести что оно положительное.в противном случае вывести,что оно отрицательное
Показать ответ
Ответ:
Trashers228
21.06.2020 02:50
Var a:integer;
begin
readln(a);
if a>0 then writeln('Число положительное')
else writeln('Число отрицательное');
end.
0,0
(0 оценок)
Ответ:
TMuhriddin
21.06.2020 02:50
Var a: integer;
begin
readln(a);
if a>0 then
writeln('число положительное');
if a<0 then
writeln('число отрицательное);
end.
Что делать в случае, если число равно 0?
0,0
(0 оценок)
Популярные вопросы: Информатика
Kartakova
31.03.2020 13:16
Придумать задачу (из жизни) на реализацию циклического алгоритма. Определить тип цикла. Задача на нахождение результата выполнения алгоритма...
yulyatimonen
05.04.2022 04:02
Вавиационном подразделении служат потапов, щедрин, семёнов, коновалов и самойлов. их специальности (они перечислены не в том же порядке, что и фамилии): пилот, штурман,...
makstaira2203
07.06.2020 15:49
Составьте программу вычисления катетов прямоугольного треугольника площадью s,у которого длина одного катета в два раза меньше длины другого...
gmejenny
07.06.2020 15:49
Составьте программу которая формирует массив из 16 случайных целых чисел от -20 до 20 и определяет если в этом массиве хотя бы одно число кратное трём? паскаль...
даник293
16.02.2023 03:34
Какие разновидности программного обеспечения имеются на современных компьютерах? подготовьте сообщение. ❤️...
KyroSC
04.04.2023 09:46
Проверить, попадает , ли число а , в промежуток (b; c) .все числа вводятся с клавиатуры...
геймер39
21.10.2022 09:34
информатика 1. сколько учеников 10 и 11 классов сдали экзамен по и иностранному языку на 4 и 5 ответ в ячейк2. какой % учеников не сдавали экзамен хотя бы по 1 предмету....
Dirol1337
06.06.2022 23:11
Будь ласка іть нада написати програму в basic з цих двох алгоритмі...
ка566
29.01.2020 17:20
Найти среднее арифметическое нечетных чисел в массиве а[10] (язык c++)...
juliaked1
25.02.2023 18:09
Вс++ дана последовательность действительных чисел а1 ≤ а2 ≤ .… ≤ аn. вставить в нее действительное число b так, чтобы последовательность осталась неубывающей. нужна с...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a);
if a>0 then writeln('Число положительное')
else writeln('Число отрицательное');
end.
begin
readln(a);
if a>0 then
writeln('число положительное');
if a<0 then
writeln('число отрицательное);
end.
Что делать в случае, если число равно 0?