Функции Sqr, Abs, Sqrt, Sin, Cos, Arctan, Ln, Exp, Pi в Pascal.

Мы уже знаем, какие существуют функции для целых переменных. Это – нахождение модуля числа (Функция Abc), а также возведение числа в квадрат (Функция Sqr). В этом уроке мы рассмотрим функции, применяемые к дробным числам. Это функции Sqr - квадрат ...

Строки в Паскаль.

Тип данных String (строковый тип) используется в Паскаль для обработки текстов. Если в одну переменную типа Char можно записать лишь один символ, то в переменную типа String можно записать до 255 символов.

Тип данных String в Pascal.

Со строковыми переменными можно производить различные операции. Операция сцепления строк позволяет соеденить 2 строки между собой.

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

Спецификация процедуры.

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

Линейные процессы вычислений.

Простейший алгоритм представляет собой цепочку блоков (операторов) от начального блока до конечного. Каждый блок должен быть выполнен один единственный раз. Это линейный алгоритм. Он отражает ...

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

Текст, который мы выводим на экран с помощью процедуры Writeln или с помощью оператора Write можно изменять. Процедура Textcolor используется для изменения цвета выводимого текста. Процедура Textbackground изменяет цвет фона, на котором выводится текст. Процедура Window задает окно, в котором будет выводиться текст.

 program number4; uses crt; begin clrscr; Window (20,5,60,20); Textbackground (14); Textcolor (1); writeln(‘Это сообщение выводится синим цветом на желтом фоне’); readln end.

Строка №2. Подключаем к программе модуль Crt. Мы уже упоминали этот модуль, когда использовали процедуру очистки экрана Clrscr. Помимо этого данный модуль подключается к программе для управления способами вывода на экран. Он позволяет устанавливать курсор в нужную позицию на экране (gotoxy), устанавливать цвет фона (textbackground) и цвет выводимых символов (textcolor) и многое другое. В конце обязательно ставится точка с запятой.

Строка №5. Записываем процедуру Window. Эта процедура определяет, где на экране будет находиться текстовое окно. Window (x1, y1, x2, y2): (x1, y1) - координаты для верхнего левого угла окна. (x2,y2) – координаты для нижнего правого угла окна. Таким образом, запись Window (20,5,60,20) означает, что у нас задается окно. Его координаты: левый верхний угол (20,5) и нижний правый угол (60,20). Ниже дана простая схема.

razmetka okna v windows

Самый большой черный прямоугольник – это весь экран. В компиляторе Turbo Pascal ширина экрана равна 80 столбцам и 43 строкам (для Free Pascal - 80 столбцов и 38 строк). Красный прямоугольник внутри – это экран, определяемый процедурой Window (20,5,60,20). Самое главное здесь – запомнить, что координаты отмеряются с верхнего левого угла. Теперь все действия, которые будут производится в программе (например, вывод сообщения на экран) будут производится в этом окне.

В строке №6 записываем процедуру Textbackground, которая устанавливает цвет для фона, на котором будет выводиться текст. После записи слова Textbackground в скобках указывается значение. Мы указали значение 14. Это число соответствует желтому цвету в палитре цветов Паскаля. Ниже находится таблица, в которой указаны все 16 цветов, входящих в палитру цветов Паскаля.

В строке №7 записываем процедуру Textcolor. Эта процедура устанавливает цвет для выводимого на экран текста. После записи Textcolor в скобках записываем значение 1, что соответствует синему цвету.

palitra tsvetov v Pascal

Строка №8. Выводим на экран сообщение.

Теперь набрем программу в Паскале и запустим ее.

textbackground textcolor window

textbackground textcolor window.

У нас выводится сообщение. Обратите внимание, что оно выводится не в начале экрана, а в начале невидимого экрана, определенного процедурой Window. Кроме того, сообщение выводится, синим цветом, на желтом фоне. Это действие Textbackground и Textcolor.



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

CRT – английская аббревиатура, которая обозначает электронно-лучевую трубку. Таким образом, название модуля Crt подчеркивает, что он умеет управлять способами вывода на экран.

 

Комментарии  

 
-73 # Нео 02.12.2012 12:33
изучал Visual Basic, JS, PHP. Мгу сказать тольк что паскаль такое дерьмо :lol:
Ответить
 
 
+64 # Sauron 06.12.2012 12:21
Могу сказать, что вы невежда. Во-первых Visual Basic - это среда программировани я, а не язык, в отличии от JavaScript и PHP. Во-вторых, паскаль -это язык программировани я для НАЧИНАЮЩИХ!
Ответить
 
 
+29 # Антон 25.02.2013 11:49
Да, для начинающих просто отличный язык!)
Ответить
 
 
+21 # Петяй 20.03.2013 21:50
А ты лучше язык придумал?
Ответить
 
 
-30 # Ahtung 06.12.2012 16:17
:D :lol: :-) ;-) 8) :-| :-* :oops: :sad: :cry: :o :-? :-x :eek: :zzz :P :roll: :sigh:
Ответить
 
 
0 # Настаси 07.03.2014 16:12
мне 13 лет, в школе изучаю язык програмирования , этот сайт мне во многом помог, но я не могу найти как виводить символы разного цвета в одной строке, кто знает, подскажите пожалуйста
Ответить
 
 
+11 # Дмитро 29.10.2015 18:01
textcolor(); write();
textcolor(); write();
textcolor(); write();
textcolor(); write();
textcolor(); write();
і так дальше або
...
for i:=0 to 15 do
begin
textcolor(i);
write('G');
end;
...
Ответить
 
 
-9 # Baxa 28.03.2014 07:57
это свет не нравится
Ответить
 
 
+10 # Илюха 11.08.2014 04:01
Настаси,вот лови для тебя писал
uses crt;
var j,a,i:integer;
b:string;
begin
textbackground(0);
clrscr;
j:=1;
readln(b);
a:=Length(b);
for i:=1 to a do
begin
textcolor(j);
j:=j+1;
if j=15 then j:=1;
write(b);
end;
writeln;
end.
Ответить
 
 
+9 # Для 27.07.2015 17:11
Начинающий?
Можно проще и короче.
uses crt;
var i:integer;
b:string;
begin
clrscr;
readln(b);
for i:=1 to length(b) do
begin
textcolor(i-i+(i mod 15));
write(b);
end;
readkey;
end.
Ответить
 
 
+3 # Для 27.07.2015 17:14
textcolor(i mod 16);**
Ответить
 
 
0 # Николaй 17.10.2016 09:50
там выводит полностью слова закрашено,а нужно чтобы каждая буква имела цвет
Ответить
 
 
+2 # сергей 14.07.2016 21:19
это программа выводит весть слов(b) разного цвета, а не буквы разного цвета
Ответить
 
 
0 # Николсй 17.10.2016 09:49
напишите как правильно будет
Ответить
 
 
+2 # Александр Филон 24.02.2016 09:49
а как можно сделать цвет рандомный выводимого текста?
Ответить
 
 
+5 # Таня 24.03.2016 19:37
X:=randon(16);
Textcolor(x);
Ответить
 
 
+4 # Михаил 06.06.2016 18:09
какой такой randoN? :lol: :D
Ответить
 
 
0 # fghj 28.02.2017 12:43
:D
Ответить
 

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

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

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