profile
Опубликовано 4 года назад по предмету Информатика от Makaloveyou

Написать программу, которая по заданной дате (числу d и месяцу m) определяет число дней, прошедших от начала года, если известно, что год - не високосный.

  1. Ответ
    Ответ дан archery
    Const Months: Array [1..12] Of Integer = (31,28,31,30,31,30,31,31,30,31,30,31);
    var d, m, result, i :integer;
    Begin
      read(d, m);
      for i := 1 to m-1 do
        result := result + Months[i];

      writeln(result + d);
    End.
    1. Ответ
      Ответ дан zhazikos
      спосибо