Алгоритмизация_и_программирование. Алгоритмизация и программирование План
Скачать 1.51 Mb.
|
INPUT nINPUT n DIM A(n) FOR i=1 to n ‘ввод элементов массива A(i)=INT(20*RND)-10 ' A(i)=INT((max-min)*RND)+min PRINT A(i) NEXT i FOR i=1 to n-1 ‘сортировка FOR j=i+1 to n IF a(i)>a(j) THEN SWAP a(i), a(j) NEXT j NEXT i FOR i=1 to n ‘вывод элементов массива PRINT A(i) NEXT I END
правило элементов главной диагонали правило элементов побочной диагонали Пример. Вывести на печать часть двумерного массива:
INPUT nINPUT n DIM A(n,n) FOR i=1 to n FOR j=1 to n A(i,j)=INT(20*RND)-10 PRINT A(i,j); NEXT j NEXT i FOR i=1 to n FOR j=1 to n IF i<=j and i+j<=n+1 THEN PRINT A(i, j); ELSE PRINT “ “; NEXT j NEXT i Функции для работы с символьными данными: ASC (симв_выражение) - возвращает целое число – десятичный код первого символа значения симв_выражения (в соответствии с кодовой таблицей символов). Например: PRINT ASC (“Q”) ‘На экране: 81 CHR$ (код_символа) - возвращает символ, соответствующий заданному коду. Например: PRINT CHR$ (65) ‘На экране: A VAL (симв_выражение) - рассматривает значение симв_выражения как цепочку цифр и возвращает число, представленное этими цифрами. Например: PRINT VAL (“+6.53”) ‘На экране: +6.53 STR$ (арифм_выражение) - возвращает строку символов, представляющую в цифрах значение арифм_выражения. Напр.:n% = 24: PRINT “Лот №” + STR$ (n%) ‘На экране: Лот№24 LEN (симв_выражение) - возвращает длину значения симв_выражения (длину строки в символах). Например: a% = LEN (“Текст”): PRINT а% ‘На экране: 5 Максимальная длина строки составляет 255 символов. LEFT$ (симв_выражение, n) - возвращает строку символов из n левых символов значения симв_выражения. Например:a$ = LEFT$ (“Париж-” + “Москва”, 5): PRINT a$ На экране: Париж RIGHT$ (симв_выражение, n) - возвращает строку символов из n правых символов значения симв_выражения. Например: b$ = RIGHT$ (“Токио, Япония”, 6): PRINT b$ ‘На экране: Япония MID$ (симв_выражение, k, n) - возвращает фрагмент симв_выражения из n символов, начиная с k – го (k = 1, 2, …). Напр.: с$ = MID$ (“Галактика”, 3, 4) PRINT c$ ‘На экране: лакт LTRIM$ (симв_выражение) - возвращает копию строки с удаленными пробелами слева. RTRIM$ (симв_выражение) - возвращает копию строки с удаленными пробелами справа. SPACE$ (n) - возвращает строку пробелов длиной n (0-32767). STRING$ (k, n) - создает и возвращает строку одинаковых символов. k - длина строки, n - десятичный код символа. Пример. Вывод строки символов в обратном порядке. INPUT “Введите любую строку символов”; c$ n = LEN (c$) DIM a$ (n) FOR i = 1 TO n a$ (i) = MID$ (c$, i, 1) NEXT i FOR i = n TO 1 STEP –1 PRINT a$ (i) NEXT i END Графический режим работы адаптера устанавливается оператором SCREEN N где N – номер видеорежима (0-13). Рекомендуемые режимы: 9 (для видеоадаптера EGA) и 12 (для VGA).
|