Ребята помогите! Пожалуйста
Составте программу нахождения растояния мужду двумя точками с координатами x1 и x2, лежащими на числовой оси. Значения x1 и x2 введте с клавиатуры.
Ответы
Ответ дал:
0
var x1,x2:integer;
begin
writeln('x1');
read(x1);
writeln('x2');
read(x2);
if x1>x2 then
writeln(abs(x1-x2))
else
writeln(abs(x2-x1));
end.
begin
writeln('x1');
read(x1);
writeln('x2');
read(x2);
if x1>x2 then
writeln(abs(x1-x2))
else
writeln(abs(x2-x1));
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад
10 лет назад