Человеку сегодня исполнилось R лет.Сколько ему дней, часов, минут, секунд (високосные годы не учитывать). Спасибо.
Человеку сегодня исполнилось R лет.Сколько ему дней, часов, минут, секунд
(високосные годы не учитывать).
Спасибо.
Гость
Ответ(ы) на вопрос:
ГостьProgram test ;
Var
age:integer;
Begin
Writeln('Вы прожили уже ',age*365,' дней);
Writeln(age*365*24,' часа');
Writeln(age*365*24*60,' минут');
Writeln(age*365*24*60*60,' секунд');
End;
Не нашли ответ?
Похожие вопросы