Реализации алгоритмов/Алгоритм пасхалии: различия между версиями

м
Нет описания правки
(Добавлены описание задачи, описание алгоритма и реализации на Basic, C, C++, Go, Pascal, Python, Rust)
м
Sub PrintDate(calendar As String, year As Integer, month As Integer, day As Integer)
Print calendar; ": ";
Print Str$(year); "-";
If month < 10 Then Print "0";
Print Str$(month); "-";
If day < 10 Then Print "0";
Print Str$(day)
End Sub
 
где К — название календаря, ГГГГ — год, ММ — двузначный номер месяца, ДД — двузначное число.
}
procedure PrintDate(calendar: String; year: Computus.TYear; month: Computus.TMonth; day: Computus.TDay);
begin
Write(calendar, ': ', year, '-');
74

правки