Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Matvey0203
07.06.2023 15:00 •
Информатика
1. составить программу: если сумма двух чисел положительна, то определить их разность, а в противном случае - произведение (ветвление). написать программу на
Показать ответ
Ответ:
Вишня007
04.10.2020 21:24
Var
a, b: integer;
begin
readln(a, b);
if(a + b > 0) then write(a - b)
else write(a * b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
dicsi1
01.09.2020 00:31
Какими командами можно изменить значение свойства объекта...
ziminasofa2703
10.05.2023 19:53
Установите соответствие между стандартными «горячими клавишами» Wordи командами....
Gutlock
18.04.2020 12:09
Множество однотипных элементов которым можно присвоить общее имя различающихся индексами...
sir58k
28.05.2022 16:55
Напишите 4 любые программы с двумерными массивами в python 3.6...
brandenberg
29.10.2022 08:15
Программа на си,задание такое:1 процесс открывает файл порождает 2 процесс.Один из них записывает 1 байт в файл подает сигнал другому,второй читает и выводит на экран.Повторить N(у...
dimonst
13.05.2022 17:26
В некотором алфавите записан текст из 80 символов, количество информации в тексте 60 байтов. Сколько символов в алфавите?...
iammrproper
27.07.2021 02:51
Таблица сравнения -текстовый редактор и текстовый процессор...
Лизунчик011
25.01.2023 11:08
Допиши предложения Самая близкая к Солнцу планета...
aviatorm
25.01.2023 11:08
Приведи примеры, кто как готовится к зиме...
proskurina773
25.01.2023 11:08
Отметь галочкой правильные высказывания. Все звери - млекопитающие. Все насекомые - шестиногие. У паука шесть ног, значит, он насекомое....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a, b: integer;
begin
readln(a, b);
if(a + b > 0) then write(a - b)
else write(a * b);
end.