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

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

Функции Copy, Pos, процедуры Delete, Insert.

Функция Copy позволяет копировать из строки часть символов. Функция имеет 3 параметра. Copy (st, index, count). St-строка из которой копируют, Index-номер символа, с которого начинается копирование, Count-количество символов, которое будет ...

Логические операции And, Or, Not, Xor в Pascal.

Над переменными логического типа можно производить логические операции. В языке программирования Pascal существуют следующие логические операции : Andлогическое умножение, Orлогическое сложение, Notлогическое отрицание, Xor ...

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

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

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

Вложенные итерационные циклы.

Под вложенным итерационным циклом понимают такую алгоритмическую структуру, при которой в тело одного итерационного цикла включен другой итерационный цикл. Другими словами, любая составная ...

Уроки Паскаль

Иногда, бывает так, что у нас в программе встречаются величины, которые не меняются в процессе выполнения программы (т.е. фактически они противоположность переменных). Такие величины называются константами. Константы указываются в специальном разделе, который называется Const.

В качестве констант в языке программирования Pascal могут использоваться:

  • Целые числа. Они записываются со знаком или без знака и могут иметь значение от – 2 147 483 648 до + 2 147 483 647. Если константа имеет значение, выходящее за эти пределы, то в качестве значения константы необходимо использовать вещественные числа.
  • Вещественные числа записываются со знаком или без знака с использованием десятичной точки или экспоненциальной части, которая начинается с символа «e», за которым следует десятичный порядок. Например, запись 3.14e5 означает 3,14*105. А запись – 3.14e-4 означает – 3,14*10-4.
  • Шестнадцатеричные числа, которые состоят из шестнадцатеричных цифр со знаком доллара «$» впереди. Диапазон шестнадцатеричных чисел — от $00000000 до $FFFFFFFF.
program number21;
uses crt;
Const G = 9.8;
Var V, H: Real;
begin
clrscr;
writeln (‘Введите высоту башни:’);
readln (H);
V:=Sqrt(2*G*H);
writeln (‘Скорость падения равна ‘,V:6:3);
readln
end.

Строка №3. Раздел Const - это раздел, который описывает константы. Он должен находиться перед разделом Var, описывающий переменные. В данном случае, в разделе описания констант мы записываем константу «G», которая будет являться именем нашей константы (имя мы придумываем сами) и указываем для нее значение 9.8. В нашей программе константа «G» будет описывать ускорение свободного падения, которое, как известно, величина постоянная и равна 9.8 м/с. Тип константы определяется автоматически. Т.е. здесь, в отличии от раздела описания переменных Var не нужно указывать тип данных. В данном случае число 9.8 дробное, поэтому тип данных будет вещественным. Обратите внимание, что когда мы присваиваем константе какое-либо значение, то используется знак «=». Это отличает константы от переменных. Если Вы помните, то при присвоении переменной какого-либо значения используется знак «:=».

В строке №9 записываем формулу для расчета скорости свободного падения, которая, как известно, вычисляется по формуле V2=2gh

konstantih v paskalj

В появившемся окне введем высоту башни, например 10, и нажмем Enter.

konstantih v paskalj.



Использование шестнадцатеричных чисел в качестве значения константы.

Program number22;
Uses Crt;
Const t = $f;
Begin
ClrScr;
Write(t);
ReadLn
End.

В строке №3 записываем имя константы, которое придумываем сами. Например, назовем константу латинской буквой «t». Затем присваиваем константе значение $f. «f» в шестнадцатеричной системе счисления имеет значение 15.
В строке №6 выводим значение константы на экран.

konstantih v paskalj..

konstantih v paskalj...


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

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

Комментарии  

 
+4 # nara 12.01.2013 13:45
спасибо за информацию :lol:
Ответить
 
 
+3 # Владимир 19.02.2013 13:18
я не понел почему в ускорение свободного падения 6:3 ???
Ответить
 
 
+11 # Алексей 20.02.2013 04:42
6:3 это не скорость падения, а формат вывода скорости (3 знака после запятой).
Ответить
 
 
-5 # 1 26.01.2015 11:22
:D :lol: :-) ;-) 8) :-| :-* :oops: :sad: :cry: :o :-? :-x :eek: :zzz :P :roll: :sigh:
Ответить
 
 
-4 # фывфыв 06.02.2016 11:02
:D :lol: :-) ;-) 8) :-| :-* :oops: :sad: :cry: :o :-? :-x :eek: :zzz :P :roll: :sigh:
Ответить
 
 
-4 # Юра Захарчук 08.02.2016 10:41
:cry: :cry: :cry: :cry: :oops: :oops:
Ответить
 
 
-5 # Юра Захарчук 08.02.2016 10:42
:P : :P :P P :P :P
Ответить
 
 
-5 # Пп 04.07.2016 07:59
:oops: :oops: :oops:
Ответить
 
 
0 # Genesis 21.05.2017 09:31
We are a group of volunteers and starting a new scheme
in our community. Your site offered us with valuable information to work on. You have done an impressive job and our whole community
will be thankful to you.

Also visit my web site ... Jan Jakub smigielski: http://ladnabielizna.hekko24.pl
Ответить
 
 
0 # Marcella 06.06.2017 02:58
Wonderful post! We are linking to this particularly great content on our website.

Keep up the great writing my essay: http://www.namaskaaar.com/article.php?id=10746.
Ответить
 
 
0 # Angel 09.06.2017 16:41
Have you ever thought about adding a little bit more than just your articles?
I mean, what you say is fundamental and all.
But imagine if you added some great photos or video clips to give your posts more,
"pop"! Your content is excellent but with pics and videos, this site could
definitely be one of the very best in its niche. Wonderful blog!


Check out my web-site :: Edmund Pieczynski: http://ladnabielizna.xcl.pl
Ответить
 
 
0 # Imogen 10.06.2017 01:01
Woah! I'm really digging the template/theme of this site.
It's simple, yet effective. A lot of times it's tough to get that
"perfect balance" between superb usability and visual appearance.
I must say you've done a fantastic job with this. Also,
the blog loads super fast for me on Safari. Outstanding Blog!


my website ... Mariusz Matyjaszczyk: http://kurtkiplaszcze.vipower.pl
Ответить
 
 
0 # Blanca 01.07.2017 22:46
No matter if some one searches for his essential thing, thus he/she needs to be available that in detail, so that thing is maintained over here.


My webpage :: Herman Jarzabek: http://tanieperfumy.xcl.pl
Ответить
 
 
0 # Brock 02.07.2017 07:33
I love your blog.. very nice colors Nikita
Janczak: http://kurtkiplaszcze.hekko24.pl
Ответить
 
 
0 # Krista 03.07.2017 00:34
Thanks to my father who informed me on the topic of this webpage, this blog is really remarkable.


Feel free to surf to my web page Leonard Wrobel: http://tanieperfumy.hekko24.pl
Ответить
 
 
0 # Celsa 03.07.2017 16:51
Since the admin of this web site is working, no hesitation very quickly
it will be renowned, due to its quality contents.


Feel free to surf to my site; Kordian Porada: http://ladnabielizna.xcl.pl
Ответить
 
 
0 # Bret 04.07.2017 01:53
Your means of describing the whole thing in this article is truly fastidious, every one be capable
of easily be aware of it, Thanks a lot.

Here is my blog :: Sylas Wegrzyn: http://ladnesukienki.098.pl
Ответить
 
 
0 # Lidia 04.07.2017 09:07
It's appropriate time to make some plans for the future
and it's time to be happy. I've read this post and if I could I desire
to suggest you few interesting things or advice. Perhaps you can write next articles referring to
this article. I want to read even more things about it!

Feel free to visit my page; Wolfgang Wiacek: http://ladnabielizna.vipower.pl
Ответить
 
 
0 # Inge 04.07.2017 18:46
I really like reading through an article that can make men and women think.
Also, thank you for permitting me to comment!


my website: Dacjan Pietras: http://ladnetorebki.hekko24.pl
Ответить
 
 
0 # Phillis 04.07.2017 21:05
My brother recommended I would possibly like this website.
He was totally right. This submit actually made my day.
You cann't imagine just how so much time I had spent for this info!
Thank you!

My page Nestor Sawicki: http://ladnetorebki.hekko24.pl
Ответить
 
 
0 # Jared 05.07.2017 13:23
I all the time used to study post in news papers but now as I am a user of net therefore
from now I am using net for content, thanks to web.


Stop by my web page :: Kazimierz Przybysz: http://kurtkiplaszcze.hekko24.pl
Ответить
 
 
0 # Yvette 06.07.2017 01:54
This excellent website definitely has all the info I
wanted about this subject and didn't know who to ask.


my web blog; Mateusz Grajewski: http://ladnesukienki.hekko24.pl
Ответить
 

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

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

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