Использование вложенного оператора If.

Условные операторы в Pascal можно вкладывать друг в друга. Для этого используется вложенный оператор IF. Рассмотрим это на примере программы, которая будет считать количество корней квадратного уравнения.

Функции LENGTH и CONCAT.

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

Тип данных Char. Функции Ord, Chr.

Мы с Вами уже рассмотрели типы данных, которые позволяют хранить и обрабатывать целые числа (integer) и дробные числа (real). Теперь рассмотрим тип данных, позволяющий хранить и обрабатывать различные символы. Символы – это все буквы и значки, ...

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

Тип данных Real.

Тип REAL (вещественный). Число типа REAL занимает три слова (шесть байтов). При работе с вещественными числами нужно помнить, что на любом отрезке вещественной оси существует бесчисленное множество ...

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

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

Как мы уже знаем, для вывода на экран какого-либо текста используется либо процедура Write, либо Writeln. Эти процедуры применяются исключительно в текстовом режиме. Для того чтобы вывести на экран текст в графическом режиме используется процедура OutText.

 Вывод текста на экран в графическом режиме. Процедура OutText.




Program Graphika17;
Uses Graph;
Procedure Graphinterface;
Var  gd, gm, error:Integer;
s:String;
Begin
gd:=detect;
s:=' ';
Initgraph(gd,gm,s);
error:=GraphResult;
if error<>GrOk then
begin
writeln(GraphErrorMsg(Error));
Halt(error)
end
end;
begin
Graphinterface;
setcolor(3);
outtext ('pascal');
readln;
end.



В строке №19 устанавливаем цвет для выводимого на экран текста. Т.е. процедура SetColor определяет не только цвет линий, но цвет текста, выводимого с помощью процедуры OutText.

В строке №20 записываем процедуру OutText.  Эта процедура выводит на экран текст в графическом режиме. Сам текст записывается в круглых скобках и в кавычках после слова OutText. В нашем примере мы выводим на экран слово «pascal».

outtext

outtext.

Как видете, процедура OutText выводит текст в месте расположения текущего указателя (по умолчанию указатель находится в точке с координатами 0,0).


Предыдущая статья : Процедуры PieSlice и Sector.

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

Следующая статья : Процедура SetTextStyle.


Комментарии  

 
0 # оноен 13.05.2014 22:31
:-x
Ответить
 
 
+2 # Александр 22.04.2016 07:31
Как вывести на нужных мне координатах?
Ответить
 
 
+2 # вася 11.12.2016 14:33
Как сделать текст крупнее?
Ответить
 
 
0 # vinchester 12.01.2022 18:27
ничего не понятно если чесно. Никаких дополнений :cry:
Ответить
 

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

   ГлавнаяПаскальГрафика в ПаскальВывод текста на экран в графическом режиме.