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

[dimonnn777]

Помоему ему надо так

Code: Select all

def F
input "Введите возраст ребенка в годах":X
if X<1 or X>18 then print "Некорректный возраст больного"
y=(16+X)/4
z=FRACT (y)
if z>=0.5  then y=y-z+0.5
if z<0.5  then y=y-z
print "Эндотрахеальная трубка = " ;y
pause 2
text clear
end def 
loop:F
pause 0.5
goto loop

[Tantrixx]

Здравствуйте. А что должно было получиться в вашей программе со временем? Пишет, что функция повторяется с def time и все. Несколько раз проверил у себя правильность написания.

[Flower]

Здравствуйте. А что должно было получиться в вашей программе со временем? Пишет, что функция повторяется с def time и все. Несколько раз проверил у себя правильность написания.

Я переименовала функцию и заработало:

DEF TIM
H = CURRENT_HOUR()
M = CURRENT_MINUTE()
S = CURRENT_SECOND()
TEXT CLEAR
PRINT H & ":" & M & ":" & S
END DEF
'бесконечный цикл
LOOP: 'метка
TIM 'вызов функции
PAUSE 1
GOTO LOOP 'переход на метку

[Mr. Kibernetik]

TIME() - системная функция, это имя нельзя использовать для функции пользователя.

[Flower]

TIME() - системная функция, это имя нельзя использовать для функции пользователя.

И я о том же!!! Mr.K, поправьте в своем уроке 3 пример программки ([def time....],
которая выдает текущее время а то она не работает!

[Mr. Kibernetik]

TIME() - системная функция, это имя нельзя использовать для функции пользователя.

И я о том же!!! Mr.K, поправьте в своем уроке 3 пример программки ([def time....],
которая выдает текущее время а то она не работает!

Спасибо, что обратили мое внимание. Исправил.
Когда писались уроки такой встроенной функции еще не было.