Viết chương trình nhập vào số năm N được nhập từ bàn phím

Vietjack.me giới thiệu bộ câu hỏi ôn tập Tin học có đáp án được biên soạn bám sát chương trình học giúp bạn ôn luyện và bổ sung kiến thức môn Tin học tốt hơn. Mời các bạn đón xem:

1 258 03/08/2023


Viết chương trình nhập vào số năm N được nhập từ bàn phím

Đề bài: Viết chương trình nhập vào số năm N được nhập từ bàn phím và cho biết năm N vừa nhập là năm nhuận hay năm không nhuận.

Hướng dẫn

- năm nhuận là năm có 366 ngày , ngược lại thì có 365 ngày

- năm nhuận là năm chia hết cho 400 hoặc chia hết cho 4 nhưng không chia hết cho 100.Sử dụng phép tính Mod để kiểm tra .Sử dụng lệnh If...Then để tìm số ngày

Lời giải:

Const Fi='LEAPYEAR.INP';
      Fo='LEAPYEAR.OUT';
Var f,g: text;
    n: qword;
Begin
        Assign(f,Fi); Reset(f);
        Assign(g,Fo); Rewrite(g);

        Read(f,n);
        If (n mod 4=0) or (n mod 400=0) and (n mod 100<>0) then Write(g,' 366')
        Else Write(g,' 365');
        Close(f);
        Close(g);
End.

1 258 03/08/2023


Xem thêm các chương trình khác: