tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу паскаль
Составить программу паскаль из 2-х чисел уменьшить на 8 а меньшее число увеличить в 2 раза
Йома
3 21.09.2019 15:50
0
Ответы
ibrohim0775
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ilyamilovanov1
09.12.2021 18:39
Реферат учащегося по информатике имеет объем 20Кбайт. Каждая страница реферата содержит 32 страницы по 23 символа в строке, мощность алфавита – 256. Сколько страниц...
АлисаСелезнёва1
09.12.2021 18:40
Компьютер “загадывает” число oт 1 дo 7, a пользователь должен его отгадать. Написать программу на C++ без использования оператора if....
58722001
17.06.2019 18:50
32кбайт=? байт 1024байт=? кбайт 256мбайт=? кбайт с решением ....
FGHJER
17.06.2019 18:50
Часть системы 9 букв подскажите слово...
Lovata
19.09.2019 04:00
Дано число. определить положительное оно или отрицательно....
pika9999777
25.05.2019 18:50
На сколько треугольников делится выпуклый: а)четырехугольник б)пятиугольник в)шестиугольник г)*n угольник своими диагоналями, проведенными из одной вершины...
Chara05
25.05.2019 18:50
Какой частью речи является словосочетание к несчастью...
Viktoriua25868
25.05.2019 18:50
Какое сокращение дробей правильное 49/70 1) 7/10 или 2)1/10...
artiom247
25.05.2019 18:50
Какое окончание в слове санкт-петербург...
maly2111q
25.05.2019 18:50
От какого слова, образованно слово ,,заместительница,, а) заместить; б) место; в) заместитель....
Популярные вопросы
Прочитайте стихотворение о.мандельштама. найдите все лексические...
1
Выбрать из художественного текста 5 предложений с орфограммой...
3
Озаглавьте первые пять глав повести тарас и бульба гоголя. и...
2
Строительная компания закупила 14 ящиков краски .в каждом ящике...
1
Какой находится объект 25 юш и 130 вд...
2
ответы на вопросы чехов толсты и тонкий 5-8 вопросов...
3
Почему дубровский открылся спицыну и маше?...
1
Ребро куба равно 3 см найдите объем куба площадь поверхности...
3
Какой части речи не встречается в тексте? ветер по морю гуляет...
2
Назовите числа делящиеся на 3 и не делящиеся на 3: 1) 120 203...
2
Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadInteger2('Введите пару чисел:');
if a>b then Swap(a,b);
b-=8; a*=2;
Println(a,b)
end.
Пример
Введите пару чисел: 6 18
12 10