Составте программу определяющую относится ли введённый с клавиатуры год к 21 веку(21век начинается с 2001 года и заканчивается в 2100 году)
Uses crt; var year:integer; begin read(year); if (year>=2001) and (year<=2100) then<br>writeln('Yes.') else writeln('No.'); end.
Пожалуйста.
Uses crt; var y: integer; begin clrscr; read(y); if (y>2000) and (y<=2100) then<br>writeln('True.') else writeln('False.'); end.