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

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

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

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

    const

    spd,elt:long;

    writeln("Finding distance... ");

    readln;

    lightspd=299792458;

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

    els:=dist/spd;

    dist,els:extended;

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

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

    begin

    end.

    dist:=lightspd * elt;

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

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

    var 

  • 1.