19 ноября, 17:43

1) Даны два числа А и В на 10. Выбрать большее из них и удвоить.

2) Увеличить число А на 10, если оно положительное, в другом случае уменьшить.

+2
Ответы (1)
  1. 19 ноября, 19:32
    0
    1)

    var

    a, b:integer;

    begin

    readln (a, b);

    if a>b then writeln (a*2);

    if b>a then writeln (b*2);

    end.

    2)

    var

    a:integer;

    begin

    readln (a);

    if a>0 then writeln (a+10);

    if a<0 then writeln (a-10);

    end.

    Надеюсь на лучший ответ
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «1) Даны два числа А и В на 10. Выбрать большее из них и удвоить. 2) Увеличить число А на 10, если оно положительное, в другом случае ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы