задача pascal

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

Question

Информатика

Лавреня

9 ноября, 08:03

задача pascal

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

+2

Ответы (1)

Знаешь ответ?

Эрнестина · Answer 1

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.

Через модули если только)

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

задача pascal

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