Bài 12:

Một năm thì chỉ có 365 ngày hoặc 366 ngày.

Năm có 366 ngày là năm nhuận. Năm nhuận có 2 trường hợp:

  + năm đó chia hết cho 4 và không chia hết cho 100.

  + năm đó chia hết cho 400.

Chỉ cần đúng 1 trong 2 là năm nhuận. Nếu cả 2 cùng sai thì là năm thường có 365 ngày.

Chương trình:

program bai_iai;
var f,g:text;
    n:longint;
begin
    Assign(f,'NHAP.INP');  reset(f);
    Assign(g,'KQ.OUT');  rewrite(g);
    readln(f,n);
    if ((n mod 4=0) and (n mod 100<>0)) or (n mod 400=0) then write(g,366)
        else write(g,365);
    close(f); close(g);
end.

Bài 2:

Bộ 3 số tạo thành độ dài của tam giác khi tổng 2 cạnh luôn lớn hơn 2 cạnh còn lại và độ dài của 1 cạnh trong 1 tam giác luôn lớn hơn 0.

Chương trình:

program bai_iai;
var f,g:text;
    a,b,c:longint;
begin
    Assign(f,'NHAP.INP');  reset(f);
    Assign(g,'KQ.OUT');  rewrite(g);
    readln(f,a,b,c);
    if (a+b>c) and (a+c>b) and (b+c>a) and (a>0) and (b>0) and (c>0)
        then write(g,'true')
    else write(g,'false');
    close(f); close(g);
end.