2005-10-25

Comenius Logo, Контрольная № 2

Задача №1: решил через 2 процедуры
tai startas
eisim
eik.į [-277 -30]
žvelk 90
eik
taškas

tai eik
jeigu spalva.po <> 12 [priekin 5 keisk.kadrą kadras + 1 lauk 50 eik]
taškas

Задача №2: одна маленькая процедура (спрашивает имя и фамилия и потом выводит имя ввиде цветочка, и фамилию в столбик 10 раз)

tai startas
eisim
vvl
teksto.statos [Arial][12 400 0 0 0]
tebus “vardas ( dialogas [Vardas ?] )
tebus “pavarde ( dialogas [Pavardė ?] )
ppsp bet.koks 15
kartok 8 [piešk.tekstą :vardas kairėn 360 / 8]
ppsp bet.koks 15
eik.į [20 50]
žvelk 0
kartok 10 [priekin 20 piešk.tekstą :pavarde]
taškas

Задача №3: Тут я запарился, но начал хорошо. Она посмотрела и сказала что хорошо, только надо поправить, а потом компьютер сглюкнул и всё пропало. Мне защитали так, за идею.

Задача №4: Опять 2 процедуры. Вроде легко, я совсем не понял.
tai startas
piešim
krv 0 [0 0 0 pš rodykis dėmesio naudosim.kadrus melas]
krv 1 [10 0 0 pš rodykis dėmesio naudosim.kadrus melas]
taškas

tai judom
rinkis kai.paspausta ~
[0 [es tik [0][eik.į pelė] tik [1][eik.į pelė + [10 10]]] ~
-1 [pð tik [0][eik.į pelė] tik [1][eik.į pelė + [10 10]]]]
judom
taškas

Правильность и отсутствие ошибок, а так-же то что вы получите хорошую оценку, использовав этот код, я не гарантирую.

Blog — Сергей Куракин @ 19:58
Уже комментировало (2) »
  1. Комментиров(ал|ала), oxiukeNo Gravatar — 2005-10-27 @ 14:44

    nu i skolko polucil za eto???

  2. Комментиров(ал|ала), Сергей КуракинNo Gravatar — 2005-10-27 @ 14:47

    А мне не сказали, я не спросил… Она писала что-то вроде 10/4 или 4/10. По барабану честно говоря.

RSS комментариев. TrackBack URI

Оставить свой комментарий