Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
cerkasovae50
05.04.2021 01:50 •
Информатика
Дано 2 числа.если их сумма больше 100,то сумму уменьшить в 2 раза.в противном случае увеличить в 2 раза
Показать ответ
Ответ:
e12esa
05.10.2020 22:12
Program n1;
var a,b,sum: real;
begin
readln(a,b);
sum:=a+b;
if sum>100 then sum:=sum/2 else sum:=sum*2;
write(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
lolologhka
12.12.2021 11:40
В поездке пятеро друзей — Антон, Борис, Вадим, Дима и Гриша, знакомились с попутчицей. Они предложили ей отгадать их фамилии, причём каждый из них высказал одно истинное и одно...
оаеквс
16.07.2022 17:00
Решите на языке Python...
jimjimkim
12.06.2022 17:30
Документ объемом 5 Мбайт можно передать с одного компьютера на другой двумя А) Сжать архиватором, передать архив по каналу связи, распаковать Б) Передать по каналу связи без использования...
ДарьяOver
05.03.2022 23:01
Какой объем памяти требуется для хранения цифрового аудиофайла с записью звука высокого качества при условии что время звучания составляет 3 минуты?...
MrLux123
30.08.2022 04:49
Водной из кодировок unicode каждый символ кодируется 16 битами. определите размер следующего предложения в данной кодировке. - лисицу спрашивал сурок с подробным ответом...
стеффа11
13.06.2020 08:23
Где используют значки-маркеры? 1) В маркированных списках 2) В нумерованных списках Информатика 7 класс НУЖНО ОЧЕНЬ...
Danika02
17.02.2022 01:43
Дано а параллельно б угол 1 и 2 равно 98 градуса найти все образовавшиеся углы...
Aixerel
05.11.2020 17:37
Осымы 10 - тапсырма . Көп нүктенің орнына қажетті сөзді қойып жаз . Жазганыңды оқы . Қате кеткен болса , түзет . 1 ) Көшеден өтерде әуелі ( қай ? ) жағыңа , көшенің орта түсына...
qwetdfgdsa
05.11.2020 17:37
Сверху камень, снизу каменьМежду ними - готовая еда.Что это?...
mrnazar228
07.02.2020 20:52
ответить на вопрос. Как интересы человека могут повлиять на его социальное положение?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a,b,sum: real;
begin
readln(a,b);
sum:=a+b;
if sum>100 then sum:=sum/2 else sum:=sum*2;
write(sum);
end.