Question

Одна звезда находится от нас на расстоянии 30 световых лет, а другая звезда на расстоянии S парсек. Разработайте программу для ответа на вопрос: какая звезда ближе к нам, первая или вторая. (1 парсек =3,26 световых года)
Нужно решить в Паскале.Заранее огромное спасибо

Answer 1

Ответ:

Var s1: integer;

s2: real;

Begin

s1:=30;

readln(s2);

s2:= s2 * 3.26;

If (s1 > s2) then write('Первая звезда дальше') else write('Вторая звезда дальше');

End.