1. Скорость звездолета 100 км/час. Звездолет летит до некоторой звезды, свет от которой...

Question

1. Скорость звездолета 100 км/час. Звездолет летит до некоторой звезды, свет от которой до Земли идет 14 минут. Определить, сколько времени потребуется звездолету, чтобы долететь до данной звезды. Решить на Паскале.

2.В равнобедренном прямоугольном треугольнике известна высота, опущенная на гипотенузу. Найти стороны треугольника. Решить в Паскале. Спасибо

Answer 1

1. 

const

lightspd=299792458;

var 

spd,elt:long;

dist,els:extended;

begin

elt := 840; {время в секундах}

writeln("Finding distance... ");

dist:=lightspd * elt;

writeln("Founded. It is near ", dist);

writeln("Finding starship elapsed time... ");

spd:=28;{скорость звездолёта в метрах в секунду}

els:=dist/spd;

writeln("Starship elapsed time:", els);

readln;

end.

2. не знаю, тут нужна геометрия