...

Тема в разделе "Информатика", создана пользователем Oljunia, 26 янв 2010.

  1. Oljunia

    Oljunia New Member

    1. ЛАЗЕРНАЯ СИГНАЛИЗАЦИЯ 1 В процессе модернизации технического обеспечения и применения новых информационныхтехнологий для защиты от воров вокруг банка поставили лазерную сигнализацию, которая состоит из нескольких лазерных станций. Станции ставятся по периметру здания, и между соседними станциями проходит лазерный луч. Также каждые соседние станции соединены кабелем. Известны координаты всех станций в порядке их обхода «по» или «против» часовой стрелки. Вам, как отличнику учебы, поручили ответственное задание – посчитать суммарную длину кабеля, который соединяет станции.
     
  2. ViCe

    ViCe New Member

    var
    n,i:integer;
    x0,y0,x1,y1,x2,y2,s:real;
    begin
    readln(n);
    s:=0;
    readln(x0,y0);
    x1:=x0;
    y1:=y0;
    for i:=2 to n do
    begin
    readln(x2,y2);
    s:=s+sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));
    x1:=x2;
    y1:=y2;
    end;
    x2:=x0;
    y2:=y0;
    s:=s+sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));
    writeln(s:10:2);
    end.
     

Поделиться этой страницей

Наша группа