profile
Опубликовано 6 лет назад по предмету Информатика от буэнооо

из 2 чисел, максимальное увеличить в 2 раза, а минимальное уменьшить в 2 раза. нарисовать блок-схему

  1. Ответ
    Ответ дан vampire666

    var a,b,max,min:integer;

    begin

    read(a,b);

    if (a>b) then max:=a; else max:=b;

    if (a<b) then min:=a; else min:=a;

    write(max*2);

    write(min/2);

    end.

Самые новые вопросы