Есть ответ 👍

Найти закопанный пиратами клад просто: все, что для этого нужно, это карта. как известно, пираты обычно рисуют карты от руки и описывают алгоритм нахождения клада так: «встаньте около одинокой пальмы. пройдите тридцать шагов в сторону леса, потом семнадцать шагов в сторону наконец десять шагов в сторону большого булыжника. клад находится под ним». большая часть таких указаний просто сводится к прохождению какого-то количества шагов в одном из восьми направлений: 1 - север, 2 - северо-восток, 3 - восток, 4 - юго-восток, 5 - юг,6 - юго-запад, 7 - запад, 8 - северо-запад (см. рис.1). длина шага в любом направлении равна 1. рис.1. путешествие по такому пути обычно является прекрасным способом посмотреть окрестности, однако в наше время постоянной спешки ни у кого нет времени на это. поэтому кладоискатели хотят идти напрямую в точку, где зарыт клад. например, вместо того чтобы проходить три шага на север, один шаг на восток, один шаг на север, три шага на восток, два шага на юг и один шаг на запад, можно пройти напрямую примерно 3,6 шага (см. рис. 1). вам необходимо написать программу, которая по указаниям пиратов определяет точку, где зарыт клад. формат входных данных. первая строка входного файла содержит число n - число указаний (1 < = n < = 40). последующие n строк содержат сами указания - номер направления (целое число от 1 до 8) и количество шагов (целое число от 1 до 1000). числа разделены пробелами. формат выходных данных. в выходной файл выведите координаты x и y точки (два вещественных числа, разделенные пробелом), где зарыт клад, считая, что ось ox направлена на восток, а ось oy — на север. изначально кладоискатель должен стоять вначале координат. необходимо вывести как целое число. формат ввода 6 1 3 3 1 1 1 3 3 5 2 7 1 формат вывода 3 2

160
245
Посмотреть ответы 2

Ответы на вопрос:


var

  i, n, d,l: longint;

  x,y: real;

begin

  assign (input, ‘klad.txt’);

  reset (input);

  read(n);

x: =0; y: =0;

for i: = 1 to n do begin

read (d, l);

x : = x+sin(pi/4*(d-1))*l;

y : = y+cos(pi/4*(d-1))*l;

end;

  assign(output, ‘kladt.txt’);

  rewrite(output);

  writeln(x: 0: 3,’ ’,y: 0: 3);

  close(output);

end.

eparhomenko
4,8(99 оценок)

1)interneturok.ru - собрано множество уроков лучших учителей, которые если ребенок не понял или пропустил тему в школе+ подготовка к экзаменам за доп. плату 2)брифли- по литре, множество кратких содержаний 3)duolingo- изучение иностранных языков в игровой форме 4)puzzle-english -изучение по фильмам, песням, различным выступлениям 5) х10 решает , расставляет коэффиценты

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS