Информатика, опубликовано 2018-08-22 23:37:36 by Гость

Найти сумму двух наибольших из трех заданных чисел. В Паскале.

Ответ оставил Гость

Var
    a, b, c, t: integer;

begin
    readln(a, b, c);
    if c > b then begin
        t := b;
        b := c;
        c := t;
    end;

    if c > a then begin
        t := a;
        a := c;
        c := t;
    end;
    writeln(a + b);
end.

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.