logo
Войти Регистрация Спроси ai-bota


Lolkekcheburecks
06.07.2020 11:50

Составить программу даны 2 числа если первое число болше 2 то его увеличить в 2 раза иначе второе число увеличь в 2 раза

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
alinaskinAS
alinaskinAS
22.01.2023 11:06
Сравните количество страниц и ключевые слова, которые найдет поисковая система по двум за поясните результат....
данил2081
данил2081
25.12.2022 20:57
На графике изображена зависимость крутящего момента двигателя от числа его оборотов в минуту. На оси абсцисс откладывается число оборотов в минуту, на оси ординат — крутящий...
ЛамповыйКун1
ЛамповыйКун1
15.01.2023 16:50
Написать программу, которая запрашивает у пользователя номер дня недели и выводит одно из сообщений: «рабочий день», «суббота», «воскресенье», или «такого дня не существует»....
kseniya0090
kseniya0090
28.04.2022 00:27
)составить программу на языке pascal, которая позволяет ввести с клавиатуры целое трехзначное число, проверяет, симметрично ли оно, и печатает сообщение на экране. (трёхзначное...
pitliknazar
pitliknazar
28.04.2022 00:27
Составить программу на языке pascal, которая позволяет ввести с клавиатуры 10 любых чисел, вычисляет и выводит на экран сумму только положительных из них....
чудовкедах333
чудовкедах333
28.04.2022 00:27
Конец семестра, я в завале : ( 1) написать программу, которая по вводимому числу от 1 до 11 (номеру класса) выдаёт соответствующее . например, если k=1 - «, первоклассник»...
mikkimaus20
mikkimaus20
08.12.2020 23:47
Вкодировке ascii на каждый символ отводится 1 байт. определите информационный объём сообщения в этой кодировке...
matvik1992
matvik1992
22.05.2023 11:21
)составьте программу вычисления суммы 180 первых членов арифметической прогрессии если а1=-100 d=0,4...
даня7345985
даня7345985
22.05.2023 11:21
Запишите в развернутом виде числа: а)а8=143511; б)а2=100111; в)а16=143511; г)а10=143,511; д)а8=0,143511; е)а16=1аз,5с1....
cat497
cat497
22.05.2023 11:21
Стестами по ! а1. определите значение целочисленных переменных a и b после выполнения фрагмента программы: a : = 3 + 3*4; b : = (a div 10) + 4; a : = (b mod 10) + 2; b: =...
Ответ:
юлия1657
28.05.2020 18:17

var a,b:integer;

begin

readln(a,b)

If (a>b)  

then a:=a*2

else b:=b*2;

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота