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

задача pascal 
Даны три точки А, В, С на числовой оси. Найти длины отрезков АС и ВС и их сумму.(нужно чтобы прошел тест на taskbook)

  1. Ответ
    Ответ дан HRAshton
    var A, B, C, AC, BC: integer;
    begin
         readln(a, b, c);
         AC := abs(C - A);
         BC := abs(B - A);
         S := AC + BC;
         Writeln('AC = ', AC);
         Writeln('BC = ', BC);
         Writeln('S = ', AC+BC);
    end.

    Через модули если только)
Самые новые вопросы