zadach365.BAS

{* Задача365 *}

REM basic

' По заданному номеру года определить номер столетия, на которое приходится этот год.


CLS
INPUT "Vvedite god : ", Y
PRINT "Stoletie ="; (Y  100) + 1
End