Sub korratabel() MsgBox ("korratabel") a = InputBox("millest algab") b = InputBox("mitu nr") f=a g=b For i = 2 To b + 1 Cells(i, 1) = f f=f+1 Next i f=a For i = 2 To b + 1 Cells(1, i) = f f=f+1 Next i End Sub Sub kust() Cells(1, 1) = Cells.Clear Cells(1, 1) = ClearContents End Sub
Kirjanduslik ekskursioon August Kitzberg 24.september 2009 aastal me käisime August Kitzbergi kooli elu ja kodu uurimas. Me käisime vaatamas Maimu koobast, ja meile tehti ekskursioon, kus elas Kitzberg ja millega ta tegeles. See kool kus käis A.Kitzberg, pidi 4aastaga ära õppima mõistusega lugemist, korratabel pidi peas olema, usu õpetus. Nad pidid oskama teretama ja Jumalaga suhelda. Kui sa kuulsid mingit uut uudist või õpetust, tuli seda teadet kohe teistega jagada. 1864 aastal ehitati see kooli maja, kus käis Kitzberg. Kooli maja ja kohtumaja oli koos ühes majas. Kõik mis toimus kohtu ruumis, oli kuulda kooli klassi. AUGUST KITZBERG August Kitzberg elas lapsena (18571871) Penuja külas Niitsaadul, kus ta vend Jaan oli koolmeister