Техника выполнения бега, метания в школе(в форме реферата) напишите

БЕГ

Ученик должен:

- при групповом старте на короткие дистанции бежать только по своей дорожке, которая должна продолжаться не менее чем на 15м за финишную отметку;

- во время бега смотреть только на свою дорожку;

- во избежание столкновений исключить резко стопорящую остановку;

- возвращаться на старт по крайней дорожке;  

- при старте на дистанции не ставить подножки, не задерживать соперников руками;

- в беге на длинные дистанции обгонять бегущих с правой стороны;

- при беге по пересечённой местности выполнять задание по трассе или маршруту, обозначенному учителем;

- выполнять разминочный бег по крайней дорожке.

МЕТАНИЯ

Необходимо быть внимательным при упражнениях в метании.

Ученик должен:

- перед выполнением упражнений по метанию посмотреть, нет ли людей в секторе метания;

- не оставлять без присмотра спортивный инвентарь;

Гуманизм и Реформация связаны с тем, что гуманисты поставили под сомнения церковный авторитет и церковную схоластику. Под влиянием идей гуманистов шёл процесс обмирщения сознания: человек стал думать не только о божественном, не только о загробном мире — его мысли обратились и к земной, мирской жизни. В человеке проснулась жажда познания, активной деятельности. Строгое соблюдение прежних церковных обрядов и таинств, посещение служб на незнакомом большинству латинском языке не удовлетворяло многих верующих и толкало их к поиску другой церкви, более простой и искренней, которая больше отвечала потребностям человека Нового времени.

   '     1)Напиши программу, выводящую на экран степени числа 3 в интервале от а до b включительно (а и b задаются пользователем).    
    
Dim a As Integer
Dim b As Integer  
Dim i As Integer    

a = InputBox("Введите а") 
b = InputBox("Введите b")
   
Dim msg As String      
msg = ""   
     
For i = a To b     
       msg = msg &  3 в степени " & i & " равно " & 3 ^ i & vbCrLf    
 Next    

MsgBox(msg)

2)Найти все делители числа 1204.   

Dim i As Integer       
Dim msg As String   
msg = ""      

For i = 1 To 1204  
          If 1204 Mod i = 0 Then      
                  msg = msg & "Число " & i & " является делителем 1204." & vbCrLf                  End If    
Next 
  MsgBox(msg)