Составить программу для решения следующей задачи: Катя про­шла от дома по на­прав­ле­нию...

Question

Составить программу для решения следующей задачи: Катя про­шла от дома по на­прав­ле­нию на запад некоторое расстояние (в м). Затем по­вер­ну­ла на север и про­шла еще определенное расстояние. На каком рас­сто­я­нии (в метрах) от дома ока­за­лась девочка?

Answer 1

Var
x,y:real;
begin
Writeln('Введите растояние, которое девочка прошла по направлению на Запад');
Readln(x);
Writeln('Введите растояние, которое девочка прошла по направлению на Восток');
Readln(y);
Writeln('Каья находится на растоянии ',sqrt(sqr(x)+sqr(y)), ' км от дома');
end.