Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Nastias1603
06.03.2020 12:27 •
Информатика
Составить программу паскаль из 2-х чисел уменьшить на 8 а меньшее число увеличить в 2 раза
Ответ:
CatyX8
08.10.2020 07:26
PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018
Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadInteger2('Введите пару чисел:');
if a>b then Swap(a,b);
b-=8; a*=2;
Println(a,b)
end.
Пример
Введите пару чисел: 6 18
12 10
0,0
(0 оценок)
Популярные вопросы: Информатика
domiks
17.12.2022 11:53
7. Объем сообщения равен 2 Кбайт. Сообщение содержит 4096 символов. Какова мощность алфавита, с которого записано сообщение?...
ananimka456
20.12.2022 18:58
Получено сообщение, информационный объем которого равен 0,25 Кбайта. Чему равен информационный объем этого сообщения в байтах?...
Ленчикбарми
06.11.2022 00:32
Расположите в порядке убывания 1010 байтов 2 байта 1кбайт 20 битов 10 битов...
fox02713foxsi
06.11.2022 00:32
Сколько двоек в троичной записи числа 420?...
emil132
04.02.2022 05:40
В примерах допущены ошибки оформленияСкопируй пример и исправь ошибкиВолк сказал: « Хорошо , я отпущу тебя, толькоТы скажи мне. »...
NastyaDND
09.11.2020 21:24
Анимация ұғымының анықтамасын жаз...
exomashka
21.01.2023 10:40
Рассмотрите блок-схему. Запишите данный алгоритм на языке программирования очень...
4okoladka100
26.07.2021 18:39
решить задачу по информатике! Максим решил отправить сообщение своему другу из Германии по каналу связи Guten Morgen . Какой объем будет иметь данное сообщение? (ответ...
НастёнышЬ14
31.03.2023 00:47
Сколько единиц в двоичной записи десятичного числа 200,625? заранее сп ....
fewralskajaribozers3
31.03.2023 00:47
Найти сумму площадей тругольников авс и мнр заднных кординатми вершин с программы паскаль...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadInteger2('Введите пару чисел:');
if a>b then Swap(a,b);
b-=8; a*=2;
Println(a,b)
end.
Пример
Введите пару чисел: 6 18
12 10