Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
JSG111
13.10.2022 00:47 •
Информатика
Ввести число вывести "мяу" если оно отрицательное и вывести "гав" если оно положительное.
Показать ответ
Ответ:
borodayegaliaf
19.07.2020 19:51
Program test;
var
a:integer;
begin
writeln('Введите число: ');
readln(a);
if a>0 then
writeln('Гав ')
else
writeln('Мяу ');
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
BarsicX
31.07.2021 13:18
На станции есть бензин нескольких марок и по разной цене. клиент выбирает марку бензина и называет количество литров. вывести чек обслуживания клиента.....
oxanabondarenkozv5l4
23.03.2023 07:38
. 1. Дано п’ять дійсних чисел: x, y, xc, yc, r. Напишіть функцію для перевірки, чи належить точка (x, y) колу з центром (xc, yc) і радіусом r. Якщо точка належить колу, виведіть...
mamatvoeymamy
16.03.2021 14:18
На этот раз используя тот же принцип, что у чат-бота напишем свой электронный ежедневник на неделю. (Если забыли, то посмотрите домашнее задание на урок). Создадим списки для дней...
kayryakdmitriyp075gy
16.02.2021 05:18
На этот раз используя тот же принцип, что у чат-бота напишем свой электронный ежедневник на неделю. (Если забыли, то посмотрите домашнее задание на урок). Создадим списки для дней...
bassanova46
23.05.2020 19:35
Какие типы программ обычно распространяются бесплатно? примеры программ....
мurr
14.01.2022 23:02
Интересно что обычная ложка вмещает 18 г воды То есть как раз 1моль. в кофейной ложечки 3 г воды .Найдите количество вещества( моль) и число молекул воды в кофейной ложке .сколько...
nastya4431
14.01.2022 23:02
Стоимость вещи была снижена на 20% для продажи. На какой процент должна быть увеличена цена, что бы продать вещь по первоначальной цене?...
azateybaikal
20.03.2020 19:08
У великої рогатої худоби безрогість (А) домінує над рогатістю (а), а чорна масть (В) над червоною (в). Абердино-ангуський безрогий плідник чорної масті спаровувався з рогатими коровами...
lydmilagerasim
20.03.2020 19:08
В треугольнике сторона =5см, углы ∠=30°; ∠=80°. Определите площадь треугольника. В ответ запишите только число. Если необходимо, ответ округлите до целого числа. Промежуточные результаты...
113456890
20.03.2020 19:08
Які з чисел 405, 738, 2001, 3333, 7704 діляться на э? А 405, 2001, 3333в 738, 2001, 7704Б 405, 738, 3333Г405, 738, 7704...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
a:integer;
begin
writeln('Введите число: ');
readln(a);
if a>0 then
writeln('Гав ')
else
writeln('Мяу ');
readln;
end.