мета-данные страницы
  •  
Загрузка не удалась. Возможно, проблемы с правами доступа?

Различия

Показаны различия между двумя версиями страницы.

Ссылка на это сравнение

Предыдущая версия справа и слеваПредыдущая версия
Следующая версия		Предыдущая версия
pascal:standart [03/04/2013 14:51] – ocapascal:standart [03/04/2013 15:45] (текущий) – oca
Строка 32: Строка 32:
 Функция //Random// имеет **две формы (!)**, одна из которых возвращает случайные "действительные числа" из стандартного интервала [0,0;  1,0), а вторая - "натуральные числа" (и 0) из диапазона, определяемого параметром. Функция //Random// имеет **две формы (!)**, одна из которых возвращает случайные "действительные числа" из стандартного интервала [0,0;  1,0), а вторая - "натуральные числа" (и 0) из диапазона, определяемого параметром.
  
-Function //Random//: Extended;+//Random: Extended//;
  
 и и
  
-Function //Random//( //Range//://Word//): //Word//;+//Random( Range: Word): Word//;
  
-Если параметр //Range// не указан, то результатом будет случайное число //X// типа //Extended// в диапазоне 0 <= //X// < 1. Если целочисленный параметр //Range// определен, то результатом будет неотрицательное случайное число //X// в диапазоне 0 <= //X// < //Range//. **Обратите внимани**е - сам //Range// никогда не возвращается!+Если параметр //Range// не указан, то результатом будет случайное число //X// типа //Extended// в диапазоне  между 0 (включительно) и 1. Если целочисленный параметр //Range// определен, то результатом будет неотрицательное случайное число //X// в диапазоне между 0 (включительно) и //Range//. **Обратите внимани**е - сам //Range// никогда не возвращается!
  
 <code pascal| Заполнение массива случайными целыми из интервала [1 , 9] > <code pascal| Заполнение массива случайными целыми из интервала [1 , 9] >
Строка 148: Строка 148:
  
  
-Общий вид Val(Stroka,Chislo,Code)+Общий вид Val(Stroka: String; var Chislo: <число>; Code:<число>)
  
 Процедура //Val// преобразует значение строки //Stroka// в величину целочисленного или вещественного типа и помещает результат в //Chislo//. Значение строковой переменной //Stroka// не должно содержать пробелов в начале и в конце.  Процедура //Val// преобразует значение строки //Stroka// в величину целочисленного или вещественного типа и помещает результат в //Chislo//. Значение строковой переменной //Stroka// не должно содержать пробелов в начале и в конце. 
Строка 170: Строка 170:
 ==== Функция Length ==== ==== Функция Length ====
  
-Общий вид Length(Stroka):Chislo+Общий вид Length(S:String):<число>
  
 Функция  //Length// возвращает действительно используемую ("актуальную") длину строки в символах, т.е число символов, которые в строку записали мы, а вернее - написанная нами программа. Эта длина закодирована в нулевом элементе строки, который никогда Length не учитывается. Функция  //Length// возвращает действительно используемую ("актуальную") длину строки в символах, т.е число символов, которые в строку записали мы, а вернее - написанная нами программа. Эта длина закодирована в нулевом элементе строки, который никогда Length не учитывается.
Строка 176: Строка 176:
 Определить длину всей строки (размер выделенной под неё памяти) в байтах можно с помощью функции  SizeOf. Определить длину всей строки (размер выделенной под неё памяти) в байтах можно с помощью функции  SizeOf.
  
-<code pascal| Применение Str>+<code pascal| Применение Length>
  
 If length(S)=SizeOf(S)-1 then  If length(S)=SizeOf(S)-1 then 
Строка 192: Строка 192:
 ==== Функция Concat ==== ==== Функция Concat ====
  
-Общий вид  //Concat(String1, String2... StringN): String//+Общий вид  //Concat(String1, String2 .. StringN: String): String//
  
 Функция с произвольным числом строковых аргументов, которые "сливаются" в общую строку. "Лишние" символы - обрезаются без предупреждения. То же самое делает операция "+". Функция с произвольным числом строковых аргументов, которые "сливаются" в общую строку. "Лишние" символы - обрезаются без предупреждения. То же самое делает операция "+".
  
-<code pascal| Применение Str>+<code pascal| Применение Concat>
  
 var  var 
Строка 223: Строка 223:
 ==== Pos ==== ==== Pos ====
  
-Общий вид //Pos(String1, String2):Position;//+Общий вид //Pos(String1,String2: String):Position;//
  
-Функция Pos возврашает позицию, начиная с которой во втором аргументе, строке String2, первый раз встречается первый - строка String1. Если String1 ни разу не встречается в String2, то во+Функция Pos возврашает позицию, начиная с которой во втором аргументе, строке String2, первый раз встречается первый - строка String1. Если String1 ни разу не встречается в String2, то возвращается 0!
  
 <code pascal| Применение Pos> <code pascal| Применение Pos>
Строка 231: Строка 231:
  
 If Pos('MA', 'MAMA') = 3 then  If Pos('MA', 'MAMA') = 3 then 
-  write('Что-то у нас не то набрано! Наверное перепутали кириллицу и латиницу в первом слоге!');+  write('Что-то у нас не то набрано! Наверное перепутали кириллицу и латиницу в слогах слова "MAMA"!');
      
      
Строка 239: Строка 239:
 </code> </code>
  
-==== Copy ====+==== Функция Copy ====
  
-<code pascal| Применение Str>+Общий вид //Copy(S:String; P, N):String// 
 + 
 +Функция Copy возвращает строку, повторяющую N символов строки S, начиная с позиции N. Если символов не хватает ( P+N > Length(S)), то итоговая строка обрезается!  
 + 
 +<code pascal| Применение Copy> 
 + 
 +String2:= Copy('string1', P, N) 
 +If String2 = 'string' then        // из строки "string1" скопировали в строковую переменную String2 часть текста "string" 
 +   Write ('P = 1, N=6');          // т.е. шесть первых символов
  
 </code> </code>
  
-==== Insert ====+==== Процедура Insert (вставка) ====
  
-<code pascal| Применение Str>+Общий вид //Insert(S1:String; var S2:String; P);// 
 + 
 +Процедура Insert "портит" строку S2,   вставляя начиная с позиции P подстроку S1, а оставшиеся символы строки S2, начиная с  прежнего символа номер P, дописываются уже за ней.  Если результат слишком длинный, то итоговая строка обрезается!  
 + 
 +<code pascal| Применение Insert> 
 + 
 +... 
 +Insert('string1', S2, 1); 
 +If S2 = 'string1' then                 // в начало строки S1 вписали  "string1"  
 +   Write ('S2 была пустая');           // 
  
 </code> </code>
  
-==== Delete ====+==== Процедура Delete (удаление) ====
  
-<code pascal| Применение Str>+Общий вид //Delete(var S1:string; P, N);//
  
 +Процедура Delete "портит" строку S1, удаляя  N символов, начиная с позиции P. Если следующие за ними символы существовали, то они продолжаются с позиции P.
 +
 +<code pascal| Применение Delete>
 +
 +...
 +S1 := S2;
 +Delete(S1, 1, length(S1));
 +If S1 = S2 then                  
 +   Write ('S2 была пустая');           
 </code> </code>