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.