сброс
рх 400,400
цх 255,255,128
цп 0,0,255
размер_шрифта 24
иди 48,208
для $n=1 до 60 {
  тп 1
  вп 8
  пр 90
  если (остаток $n, 5)==1 {
    тп 4
    вп 5
    нд 5
  }
  иначе
  {
    тп 2
    вп 4
    нд 4
  }
  тп 1
  лв 90
  вп 8
  пр 6
}
для $h=1 до 12 {
  если $h<10 {
    $a=30*$h
  }
  иначе
  {
    $a=8+29*$h
  }
  $x=190+135*sin($a)
  $y=182-135*cos($a)
  иди $x,$y
  напиши $h
}
сч