задачка pascal Даны три точки А, В, С на числовой оси. Отыскать

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

Задать свой вопрос
1 ответ
Var A, B, C, AC, BC: integer;
begin
     readln(a, b, c);
     AC := абс(C - A);
     BC := абс(B - A);
     S := AC + BC;
     Writeln('AC = ', AC);
     Writeln('BC = ', BC);
     Writeln('S = ', AC+BC);
end.

Через модули если только)
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт