Применение логических операций с оператором IF.

В данном уроке мы рассмотрим применение логической операции And с условным оператором If.

Использование program, begin…end, write, readln, Uses Crt, Clrscr.

В этом уроке мы напишем самую простую программу, состоящую всего из пяти строк. Эта программа будет выводить сообщение на экран. Для написания программы нам необходимо знать как работают операторы Write, Readln, а также понять для чего нужны ...

Оператор выбора Case Of в Pascal.

Помимо условного оператора If в языке программирования Pascal существует оператор выбора Case of. Рассмотрим его применение на примере программы, которая выводит на экран то или иное сообщение, в зависимости от введенного числа.

Циклы и массивы

Вложенный арифметический цикл. Часть 2.

Примеры использования различных операторов цикла. Вложенный цикл.

Арифметический цикл с рекуррентной зависимостью.

Многие циклические вычислительные процессы используют рекуррентные зависимости при решении различных математических задач.

Функция Length возвращает в качестве значения длину строки. Например, если в строковой переменной «stroka» записано слово «Pascal», то Length(stroka) будет равно 6. Эта операция аналогична операции Ord(stroka[0]), которую мы разбирали в 1-м уроке. Функция Concat выполняет слияние нескольких строк в одну строку. Например, если в переменной «stroka» записано слово «Turbo», а в переменной «stroka2» записано слово «Pascal», то concat(stroka,stroka2) будет равно «Turbo Pascal».

Использование функции LENGTH.




program string3;
uses crt;
var stroka:string;
begin
clrscr;
stroka:='Pascal';
writeln(length(stroka));
readln
end.


В строке №7 выводим на экран значение функции Length(stroka). Так как в переменной «stroka» записано слово «Pascal», то на экран будет выведено число 6.

funkciya length

funkciya length.


Функция Concat. Данная функция выполняет слияние нескольких строк в одну строку. Эта операция аналогична операции сцепления строк (конкатенации), которую мы рассматривали в прошлом уроке. Функция Concat соединяет строки, указанные в скобках после слова Concat в одну строку.

Использование функции CONCAT





program string4;
uses crt;
var stroka,stroka1,stroka2,stroka3:string;
begin
clrscr;
stroka1:='Programmirovanie ';
stroka2:='na ';
stroka3:='Pascal';
stroka:=concat(stroka1,stroka2,stroka3);
writeln(stroka);
readln
end.



Строка №3. Записываем 4 переменные, в которых будут храниться строковые значения.

Строка №6. Переменной «stroka1» присваиваем значение «Programmirovanie».

Строка №7. Переменной «stroka2» присваиваем значение «na».

Строка №8. Переменной «stroka3» присваиваем значение «Pascal».

Строка №9. В переменную «stroka» записываем значение функции Concat(stroka1,stroka2,stroka3). Она соединит значения, записанные в переменных stroka1,stroka2,stroka3.

Строка №10. Выводим на экран результат.

funkciya concat

funkciya concat.


Дополнение к материалу.

В случае если при соединении строк длина получившейся строки превысит 255 символов, то строка будет усечена после 255-ого символа.


Предыдущая статья : Тип данных String.

Оглавление : Уроки Паскаль. Строки.

Следующая статья : Функции Copy, Delete, Insert, Pos.


Комментарии  

 
-3 # Нео 08.12.2012 11:10
length - напоминает о Джава скрипте,
а CONCAT - j, Ексцеле. Все такое одинаковое :-*
Ответить
 
 
-3 # Стас Соскакруцуий 28.03.2014 03:25
:-|
Ответить
 
 
+4 # Курочкин Миша 23.12.2014 19:08
скажите а эта функция работает только с переменными типа string? а с переменными типа: real, integer or longint? она не может работать? пробовал но комплиатор пишет что ошибка..
Ответить
 
 
-2 # Волк 02.02.2015 18:59
Что-то не понял. :zzz
Ответить
 
 
+2 # Pascal 23.03.2015 12:56
Спасибо! Всьо очень доступно!
Ответить
 
 
+2 # Radu 16.04.2015 13:16
Vmesto concat mozhno prosto sdelati stroka1+stroka2+stroka3..
Ya i ne znal pro concat, vsegda tak delal.
Ответить
 
 
+2 # Rami 08.11.2016 18:56
Я когда использовал операцию Ord(stroka[0]), то мне выдавало ошибку, что индекс находится вне границ массива. В чем причина?
Ответить
 
 
-1 # Lite Yagami 01.12.2016 15:39
спасибо, все понятно 8)
Ответить
 
 
-2 # alecs 17.02.2017 07:42
:D :lol: :-) ;-) 8) :-| :-* :oops: :sad: :cry: :o :-? :-x :eek: :zzz :P :roll: :sigh:
Ответить
 
 
0 # JuliezTut 26.11.2017 09:08
Данное сообщение размещено здесь с помощью XRumer + XEvil 4.0
XEvil 4.0 - революционное приложение, способное обходить практически любую антибот-защиту.
Распознавание капчи Google (ReCaptcha-1, ReCaptcha-2), Facebook, Yandex, VKontakte, Captcha Com и свыше 8400 тысяч других типов!
Вы читаете это - значит, это работает! ;)
Подробности на официальном сайте XEvil.Net, есть бесплатная демо-версия.
Ответить
 
 
0 # Manuel 03.12.2017 07:20
http://tinyurl.com/y8hbkk3g ratna galih kuliah
http://tinyurl.com/ydyg7tm7 indra lesmana brugman
biografi jihan fahira: http://tinyurl.com/yc4bsd2p
lala karmela high
and dry: http://tinyurl.com/y7wp7dqh
conchita caroline quinn: http://tinyurl.com/gtaykud

Feel free to surf to my site ... nama yunita siregar: http://tinyurl.com/ya9vnxe8
Ответить
 
 
0 # Mashamep 11.12.2017 22:58
Данное сообщение размещено здесь с помощью XRumer + XEvil 4.0
XEvil 4.0 - революционное приложение, способное обходить практически любую антибот-защиту.
Распознавание капчи Google (ReCaptcha-1, ReCaptcha-2), Facebook, Yandex, VKontakte, Captcha Com и свыше 8400 тысяч других типов!

Вы читаете это - значит, это работает! ;)
Подробности на официальном сайте XEvil.Net, есть бесплатная демо-версия.

См. YouTube "XEvil ReCaptcha2"
Ответить
 

Добавить комментарий

Защитный код
Обновить

   ГлавнаяПаскальСтроки в Паскаль