Search found 14 matches

by niks26
Tue Oct 07, 2014 6:35 am
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 6
Replies: 17
Views: 10338

Re: Программирование на smart BASIC. Урок 6

ну вот, с каждым уроком все яснее и яснее...
by niks26
Fri Oct 03, 2014 8:03 pm
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 4
Replies: 42
Views: 24193

Re: Программирование на smart BASIC. Урок 4

Обратите внимание на то, где находится команда GET ORIENTATION P у меня и у вас и подумайте как она работает :geek: Обратите внимание: круги горизонтально, линии вертикально. По условиям задания :D graphics randomize def sl if maxx<> screen_width() then graphics clear 0,0,0 maxx = screen_width() ma...
by niks26
Fri Oct 03, 2014 7:24 pm
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 4
Replies: 42
Views: 24193

Re: Программирование на smart BASIC. Урок 4

Dedjto wrote:Спасибо, за подсказку.
Изменила graphics clear. Теперь все на черном экране, спасибо еще раз. Тест прошел нормально, раз 10 переворачивала IPad, все нормально и с кругами и с линиями...
Если начинать с кругов (горизонтально) остаются одни круги. У меня и того не получилось... И пока никак.
by niks26
Fri Oct 03, 2014 5:13 am
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 4
Replies: 42
Views: 24193

Re: Программирование на smart BASIC. Урок 4

Mr. Kibernetik wrote:
niks26 wrote:Или, что имелось ввиду под "вид заполнения"?
То есть чтобы держишь устройство вертикально - заполняется линиями, поворачиваешь горизонтально - продолжает заполняться, но уже кругами, поворачиваешь вертикально - опять заполняется линиями.
Вот с этим что-то прям беда...
by niks26
Thu Oct 02, 2014 9:16 pm
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 4
Replies: 42
Views: 24193

Re: Программирование на smart BASIC. Урок 4

Я бы предложил так модернизировать программу, чтобы: 1) круги и линии были случайного цвета 2) при повороте устройства во время работы программы соответственно переключался бы и вид заполнения graphics randomize GET ORIENTATION P IF P = 1 or P = 3 then metka1: mxx = screen_width() mxy = screen_heig...
by niks26
Thu Oct 02, 2014 5:26 pm
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 4
Replies: 42
Views: 24193

Re: Программирование на smart BASIC. Урок 4

graphics randomize GET ORIENTATION P IF P = 1 or P = 3 then maxx = screen_width() maxy = screen_height() metka1: x1 = rnd(maxx) x2 = rnd(maxx) y1 = rnd(maxy) y2 = rnd(maxy) draw size rnd(3) draw line x1, y1 to x2, y2 goto metka1 end if IF P = 2 or P = 4 then mx = screen_width() my = screen_height()...
by niks26
Thu Oct 02, 2014 2:32 pm
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 4
Replies: 42
Views: 24193

Re: Программирование на smart BASIC. Урок 4

graphics randomize GET ORIENTATION P IF P = 1 or 3 then maxx = screen_width() maxy = screen_height() metka1: x1 = rnd(maxx) x2 = rnd(maxx) y1 = rnd(maxy) y2 = rnd(maxy) draw size rnd(3) draw line x1, y1 to x2, y2 goto metka1 end if IF P = 2 or 4 then mx = screen_width() my = screen_height() metka2:...
by niks26
Thu Oct 02, 2014 8:32 am
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 3
Replies: 15
Views: 10030

Re: Программирование на smart BASIC. Урок 3

Code: Select all

def GIP
input "длина первого катета" : X
input "длина второго катета" : Y
print "длина гипотенузы " & sqr (X^2 + Y^2)
end def

loop:
GIP
pause 0.5
goto loop
У меня так
by niks26
Thu Oct 02, 2014 6:14 am
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 3
Replies: 15
Views: 10030

Re: Программирование на smart BASIC. Урок 3

Подскажите, чем отличается label от loop?

Какой командой можно стирать предыдущий результат?
by niks26
Thu Oct 02, 2014 3:12 am
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 1
Replies: 15
Views: 14596

Re: Программирование на smart BASIC. Урок 1

Скажите, а как сделать, чтобы после расчета гипотенузы вернуться к первоначальному запросу? Это будет в уроке 3 - переход на метку label: 'это метка print k k = k + 1 pause 0.3 goto label 'это переход на метку Получилось! Спасибо label: input "размер первого катета" : X input "размер второго катета...