Как Петя Бейсиков Тоню Соображалкину программировать учил

ЧАСЫ В КОМПЬЮТЕРЕ

— Теперь функция CLK¤. Она выдает время по часам в форме… Нет, лучше посмотрим!

PRINT CLK¤

17:21:26

Сначала часы, двоеточие, минуты, опять двоеточие и, наконец, секунды. Иногда программисту надо знать, сколько секунд прошло с начала суток.

— А зачем?

— Для расчета отрезков времени: например, как долго ученик думал над заданием обучающей программы. В начале и в конце обдумывания узнают, сколько секунд прошло с начала суток. Разность этих чисел даст длительность обдумывания.

— Рассчитать, сколько секунд прошло с начала суток, сущая мелочь. Я это берусь сделать.

— Раз берешься, сделай.

— Из символьной строки, которую выдает функция СLК¤, нужно выделить количество часов и умножить его на 3600, потом так же выделить минуты и умножить на 60. И наконец, выделить секунды и сложить с обоими этими числами.

— А как это будет выглядеть в программе?

Продолжай эту же самую программу для переделки формы даты.

— Тогда смотри.

100 A1=VAL(SEG¤(CLK¤,1,2))

Подсчитываем количество часов. Видел, как ловко я воспользовалась функцией VAL для превращения символьной строки в число?!

— Видел. Это и в самом деле было ловко. Твердо различать символьные и числовые переменные не так уж и легко.

— Дальше.

110 A2=VAL(SEG¤(CLK¤,4,5))

120 A3=VAL(SEG¤(CLK¤,7,8)

130 A=A1*3600+A2*60+A3

140 PRINT CLK¤,A

Так будет хорошо?

— Меня не спрашивай. Спрашивай машину.

RUNNH

12-02-87

17:30:40 63040

— Машина говорит, что такую прекрасную программу она давно не видела.