Функция языка Basic

При описании синтаксиса функций используются следующие обозначения их аргументов:

X и Y - произвольные числовые выражения.

I и J - целые выражения.

X$ и Y$ - строковые выражения.

В случае если вместо целого выражения задано выражение, представленное в формате с плавающей точкой, то его значение округляется и затем используется полученное целое число. Функция возвращает - выдает в качестве результата работы только целые значения или значения обычной точности.

..........................................................................................................................................................

Функция ABS возвращает беззнаковое абсолютное значение числа X.

Синтаксис: ABS (X)

Пример:

PRINT ABS(7*(-5))

RUN - запуск программы и результат.

..........................................................................................................................................................

Функция ASC возвращает числовое значение, которое является кодом ASCII первого символа строки X$.

Синтаксис: ASC(X$)

В случае, если строка пустая, выдается сообщение об ошибке "Illegal function call."

Пример:

10 X$="TEST": PRINT ASC(X$)

RUN - запуск программы и результат.

Для обратного преобразования используется функция CHR$.

..........................................................................................................................................................

Функция ATN возвращает заданное в радианах значение арктангенса X, которое находится в пределах от -pi/2 до pi/2.

Синтаксис: ATN(X)

Выражение X может иметь любой числовой тип. Вычисление арктангенса выполняется с обычной точностью для INTEGER и SINGLE, и с двойной точностью для DOUBLE. Пример:

10 INPUT X: PRINT ATN(X)

RUN - запуск программы.

? 3

Ввод числа 3 с клавиатуры и результат.

1.249046

..........................................................................................................................................................

Функция CDBL преобразует значение X в число двойной точности.

Синтаксис: CDBL(X)

Пример:

10 A=454.67: PRINT A; CDBL(A)

RUN - запуск программы и результат.

454.67 454.6700134277344

..........................................................................................................................................................

Функция CHR$ возвращает строку, символом которой является код ASCII для заданного числа I.

Синтаксис: CHR$(I)

Чаще всего функция CHR$ используется для выдачи на экран дисплея специальных символов.

Пример:

PRINT CHR$(66)

RUN - запуск программы и результат.

B

..........................................................................................................................................................

Функция CINT преобразует значение X в целое число путем округления дробной части.

Синтаксис: CINT(X)

Если значение X не лежит в пределах от -32768 до 32767, то возникает ошибка "Оverflow".

Пример:

PRINT CINT(45.67)

RUN - запуск программы и результат.

..........................................................................................................................................................

Функция COS возвращает значение косинуса X, заданного в радианах.

Синтаксис: COS(X)

Вычисление значения COS(X) выполняется с обычной точностью.

Пример:

10 X=2*COS(0.4): PRINT X

RUN - запуск программы и результат.

1.842122

..........................................................................................................................................................

Функция CSNG преобразовывает значение X в число обычной точности представления.

Синтаксис: CSNG(X)

Пример:

10 A#=975.34213

20 PRINT A#; CSNG(A#)

RUN - запуск программы и результат.

975.34213 975.3421

..........................................................................................................................................................

Функция EXP возвращает результат возведения числа е=2.718282 в степень X.

Синтаксис: EXP(X)

Значение X не должно превышать 87.3365. В случае если при возведении в степень происходит переполнение, выдается сообщение об ошибке "Overflow" и в качестве результата принимается максимально возможное число, и выполнение программы продолжается. В Turbo Basic после выдачи сообщения об ошибке работа программы останавливается.

Пример:

10 X=5: PRINT EXP(X-1)

RUN - запуск программы и результат.

54.59815

..........................................................................................................................................................

Синтаксис: FIX(X)

Результат действия функции FIX(X) эквивалентен значению следующего выражения: SGN(X)*INT(ABS(X)). Основное различие между функциями FIX и INT заключается в том, что функция FIX просто отбрасывает дробную часть числа не зависимо от его знака.

Пример:

PRINT FIX(58.75)

RUN - запуск программы на счет и результат.

PRINT FIX(-58.75)

RUN - запуск программы на счет и результат.

-58

..........................................................................................................................................................

Функция FRE возвращает число байт памяти, которые не использованы компилятором языка Basic.

Синтаксис: FRE({-1 или -2 или число}) или FRE(X$)

Функция FRE("") выполняет удаление ненужной информации в памяти машины, а затем возвращает число свободных байт. Удаление ненужной информации может длиться от одной до полутора минут. Компилятор языка Basic не выполняет удаления ненужной информации до тех пор, пока не будет использована вся свободная память. Таким образом, периодическое использование FRE("") сократит задержки, связанные с удалением ненужной информации. Функция FRE(-1) возвращает число байт памяти, которые не использованы наибольшим числовым массивом. Функция FRE(-2) возвращает число байт памяти, которые не использованы в стековой памяти. Функция FRE(<"строка">) возвращает число байт памяти, которые не использованы в области размещения строк (после первого освобождения занимаемой ими памяти в обычном блоке).

..........................................................................................................................................................

Функция HEX$ возвращает строку, которая является шестнадцатеричным представлением десятичного аргумента.

Синтаксис: HEX$(X)

Перед вычислением HEX$(X) выполняется округление значения X до целого.

Пример:

10 INPUT X: A$=HEX$(X)

20 PRINT X "ДЕС-ЧНОЕ РАВНЯЕТСЯ" А$ "ШЕСТ-МУ"

RUN - запуск программы и результат.

? 32

Число 32 задается с клавиатуры. А результат выглядит на экране следующим образом:

32 ДЕС-ЧНОЕ РАВНЯЕТСЯ 20 ШЕСТ-МУ

..........................................................................................................................................................

Функция INKEY$ возвращает либо строку, состоящую из одного символа, считанного с клавиатуры, либо нулевую строку, если с клавиатуры не было передано ни одного символа.

Синтаксис: INKEY$

Дублирование символов на экране дисплея не производится, и символы в программу не передаются, за исключением команды Ctrl-Break, которая прекращает выполнение программы.

Пример:

10 RESPONSE$=""

20 FOR I%=1 TO TIMELIMIT%

30 A$=INKEY$

35 IF LEN(A$)=0 THEN 60

40 IF ASC(A$)=13 THEN RETURN

50 RESPONSE$=RESPONSE$+A$

60 NEXT I%

70 RETURN

..........................................................................................................................................................

Функция INPUT$ возвращает строку, состоящую из X символов, которые считываются с клавиатуры или из файла с номером Y.

Синтаксис: INPUT$(X[,[#]Y])

Если клавиатура используется для ввода, символы на экране не отображаются и все управляющие символы игнорируются.

Пример 1:

10 OPEN"I",1,"DATA"

20 IF EOF(1) THEN 50

30 PRINT HEX$(ASC(INPUT$(1,#1)));

40 GOTO 20

50 PRINT

60 END

Пример 2:

100 PRINT "ВВЕДИТЕ P ДЛЯ ПРОДОЛЖЕНИЯ ИЛИ S ДЛЯ ПРЕКРАЩЕНИЯ"

110 X$=INPUT$(1)

120 IF X$="P" THEN 140

130 IF X$="S" THEN END ELSE 100

140 ….

..........................................................................................................................................................

Функция INSTR определяет первое вхождение строки Y$ в строку X$ и возвращает номер позиции, начиная с которой обнаружено совпадение.

Синтаксис: INSTR([I,]X$,Y$)

Необязательный параметр I определяет позицию, с которой начинается поиск вхождения строки Y$ в строку X$. Значение I должно быть в пределах от 1 до 255. В случае если I превышает длину строки X$, то функция INSTR возвращает ноль. Если Y$ представляет собой пустую строку, функция INSTR возвращает значение I или 1. X$, Y$ могут быть строковыми переменными, строковыми выражениями или строковыми константами.

Пример:

10 X$="ABCDEB": Y$="B"

30 PRINT INSTR(X$,Y$); INSTR(4,X$,Y$)

RUN - запуск программы и результат.

2 6

Если I=0, выдается сообщение об ошибке "Illegal argument in <номер строки>".

..........................................................................................................................................................

 

52.Что такое internet?

Интерне́т (англ. Internet, МФА: [ˈɪn.tə.net][1]) — всемирная система объединённых компьютерных сетей. Часто упоминается как Всемирная сеть и Глобальная сеть, а также просто Сеть

Интернет – это объединенные между собой компьютерные сети, глобальная мировая система передачи информации с помощью информационно-вычислительных ресурсов.

Разработка данной системы началась в 1957 году на фоне гонки вооружений. Целью создания такой сети стало решение Министерства обороны США, опасающегося нападения со стороны СССР. В результате была разработана сеть компьютеров, взаимосвязанных друг с другом и способных обмениваться информацией между собой.

Началось все с сети компьютеров, расположенной в одной комнате, затем сеть расширилась в пределах здания, города, страны… За 15 лет компьютерная сеть разрослась до международных масштабов, объединив передовых ученых всего мира. Рождение Интернета как Всемирной компьютерной сети произошло в 1973 году – к сети ученых с помощью трансатлантического телефонного кабеля подключились английские и норвежские организации.

С тех пор прошло почти 40 лет, компьютерная сеть претерпела ряд существенных изменений – и сейчас Интернет доступен большинству жителей цивилизованного мира.