задача pascal

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

Question

Информатика

Клементина

9 декабря, 17:49

задача pascal

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

+1

Ответы (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)