Question

МНОГО БАЛЛОВ!!!
Нужно дать ПОДРОБНОЕ объяснение каждой строке в программе на Pascal через //. Пример: begin //Запускаем программу
Сама задача:
var year: integer; //Назначаем тип переменной для переменной year
begin //Запускаем программу
write('Введите год: '); //Выводим информацию на экран
readln(year); //Читаем вводимую информацию в переменную year
if year mod 4 = 0 then //..
if year mod 100 = 0 //..
then if year mod 400 <> 0 then write('365 дней') //..
else write('366 дней') //..
else write('366 дней') //..
else write('365 дней'); //..
end. //..