Задать вопрос
16 декабря, 22:19

Даны три числа найти разность между большим и меньшим числом

+4
Ответы (1)
  1. 17 декабря, 00:16
    0
    Var a, b, c:integer;

    function min (x1, x2:integer) : integer;

    begin

    if x1
    end;

    function max (x1, x2:integer) : integer;

    begin

    if x1
    end;

    begin

    readln (a, b, c) ;

    writeln (max (max (a, b), c) - min (min (a, b), c)) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Даны три числа найти разность между большим и меньшим числом ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы