spikahome
?>

Космическая археологическая экспедиция исследует космическое пространство в поисках сокровищ исчезнувших цивилизаций, сканируя сигналы разных планет. Получив соответствующий сигнал, экспедиция совершает посадку на планету. На каждой планете они находят какое-то количество сокровищ, оставляют маячок для грузового транспорта и летят дальше. Начальник экспедиции ведет бортовой журнал, в котором фиксирует, сколько сокровищ было на каждой планете, и передает эту информацию по специальной связи на Землю. К сожалению, начальник экспедиции заранее не знает, на скольких планетах сохранились сокровища. определить, какой вместимости должен быть грузовой космический корабль, который нужно отправить вслед за экспедицией, когда будет подан сигнал об её окончании. Формат входных данных На вход программе подаются данные по строкам. В i-й строке информация о количестве сокровищ (целое число), найденных на i-й планете. В последней строке входных данных записано число 0. Формат выходных данных Выведите одно число – количество сокровищ, найденных экспедицией. Гарантируется, что число сокровищ, которые найдет экспедиция, меньше 109, а количество записей в бортовом журнале не превышает 106

Информатика

Ответы

Дмитрий1974
var a: array[1..2,1..4] of real;
    b,c: string; 
    d,x,y: real;
    i,j: integer;
begin
   b:='ABCD';  c:='xy';
   writeln('трапеция ABCD');
   for i:=1 to 4 do
   begin
     writeln('координаты точки ',b[i],': ');
     for j:=1 to 2 do
     begin
       write('   ',c[j],i,' = ');
       readln(a[j,i]);
     end;  
   end;  
   x:=(a[1,3]-a[1,2]+a[1,4]-a[1,1])/2;
   y:=(a[2,3]-a[2,2]+a[2,4]-a[2,1])/2;
   d:=sqrt(x*x+y*y);
   writeln('длина средней линии:  ',d:5:2);
end.

ввод - вывод

трапеция ABCD
координаты точки A: 
   x1 = 3
   y1 = 2
координаты точки B: 
   x2 = 5
   y2 = 5
координаты точки C: 
   x3 = 9
   y3 = 5
координаты точки D: 
   x4 = 10
   y4 = 2
длина средней линии:   5.50

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Космическая археологическая экспедиция исследует космическое пространство в поисках сокровищ исчезнувших цивилизаций, сканируя сигналы разных планет. Получив соответствующий сигнал, экспедиция совершает посадку на планету. На каждой планете они находят какое-то количество сокровищ, оставляют маячок для грузового транспорта и летят дальше. Начальник экспедиции ведет бортовой журнал, в котором фиксирует, сколько сокровищ было на каждой планете, и передает эту информацию по специальной связи на Землю. К сожалению, начальник экспедиции заранее не знает, на скольких планетах сохранились сокровища. определить, какой вместимости должен быть грузовой космический корабль, который нужно отправить вслед за экспедицией, когда будет подан сигнал об её окончании. Формат входных данных На вход программе подаются данные по строкам. В i-й строке информация о количестве сокровищ (целое число), найденных на i-й планете. В последней строке входных данных записано число 0. Формат выходных данных Выведите одно число – количество сокровищ, найденных экспедицией. Гарантируется, что число сокровищ, которые найдет экспедиция, меньше 109, а количество записей в бортовом журнале не превышает 106
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

heodbxbbshe
vladimyrgorbunov
Kazantsevv_kostya
goldservicepro
tarja4140
Чиркина999
ktatarinova
Новиков1139
Эдуардович873
atlantika7
scorpion21c
Arsen0708
Natacha3636672
nikolavlad
vasiliyglukhov