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.
В годы жизни Данте Флоренция была самым богатым и самым демократичным городом-республикой в Италии. Власть в городе делили две партии — гвельфов (сторонников папской власти) и гибеллинов (сторонников германского императора). В результате войны между членами этих партий победили гвельфы, гибеллины же были изгнаны из Флоренции.
Но партия гвельфов не осталась единой: она раскололась на белых и чёрных гвельфов. Белые гвельфы защищали интересы богатых горожан, чёрные — интересы нобилей (знатной аристократии).
Данте как человек, принадлежавший к цеху аптекарей и врачей, получивший права свободного горожанина, принадлежал к белым гвельфам. Когда он получил звание приора, то стремился примирить белых и чёрных гвельфов. Избрал себе жену из семьи, поддерживающей противоположную партию.
Противостояние белых и чёрных гвельфов закончилось победой чёрных. Имущество Данте было конфисковано, сам он осуждён на изгнание из любимой Флоренции.
Данте поселился в Вероне, затем странствовал по разным городам.
В 1216 году Данте был прощён и мог бы вернуться во Флоренцию, но ему предложили надеть смирительную рубаху, посыпать голову пеплом и произнести на главной площади покаянную речь. Данте отказался вернуться, написал флорентийцам суровое и гневное письмо.
Последние годы жизни Данте
Последние годы жизни поэт провёл сравнительно спокойно в городе Равенне у её правителя Гвидо де Полента, окружённый почётом и дружеским расположением жителей.
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.