Program zadacha_3;
var
hour, min,sec,time: integerl;
begin
writeln(‘время запуска ракеты’);
write(‘час’);
readln(hour);
write(‘мин’);
readln(min);
write(‘сек’);
readln(sec);
writeln(‘введите время полета’);
readln(time);
{вычисление времени возвращения ракеты на Землю}
sec:= sec+ time;
min:=min+sec div 60;
sec:=sec mod 60;
hour:=hour+min div 60;
min:=min mod 60;
hour:=hour mod 24;
writeln(‘результаты’);
write(‘время полета=’,time:3,эсек’);
writeln(‘ожидаемое время прибытия=’);
writeln(hour:2,’час’, min:2,’мин’,sec:2,’сек’);
readln;
end.
Географічна широта — відстань уздовж меридіана в градусах від екватора до будь-якої точки земної поверхні (якщо точка лежить на південь від екватора, то її широта буде південна, скорочено пд. ш., якщо на північ – північна широта, скорочено пн. ш.).
Географічна довгота — відстань уздовж паралелі в градусах від нульового меридіана (Гринвіцького) до будь-якої точки земної поверхні (якщо точка лежить на захід від початкового меридіана, то її довгота західна, скорочено зх. д., якщо на схід – східна довгота, скорочено сх. д.).
Координати точки перетину екватора та Гринвіцького меридіана записуються так: 0° ш. 0 ° д.
var
hour, min,sec,time: integerl;
begin
writeln(‘время запуска ракеты’);
write(‘час’);
readln(hour);
write(‘мин’);
readln(min);
write(‘сек’);
readln(sec);
writeln(‘введите время полета’);
readln(time);
{вычисление времени возвращения ракеты на Землю}
sec:= sec+ time;
min:=min+sec div 60;
sec:=sec mod 60;
hour:=hour+min div 60;
min:=min mod 60;
hour:=hour mod 24;
writeln(‘результаты’);
write(‘время полета=’,time:3,эсек’);
writeln(‘ожидаемое время прибытия=’);
writeln(hour:2,’час’, min:2,’мин’,sec:2,’сек’);
readln;
end.