Логические и символьные константы.

В данном уроке будет рассмотрено применение логических и символных констант. Логическая константа может принимать только 2 значения, либо True, либо False. В качестве значения символьной константы могут использоваться любые символы, которые есть в ...

Строковые константы в Pascal.

В качестве значения строковой константы может выступать любая последовательность символов. Эта последовательность заключается в апострофы. Строковая константа отличается от символьной константы тем, что здесь в качестве значения константы можно ...

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

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

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

Организация условного перехода. Оператор IF.

Для программирования разветвляющихся процессов, содержащих две ветви, используется оператор IF условного перехода (ветвления), имеющий две конструкции.

Программирование данных.

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

В прошлом уроке мы познакомились с функцией KeyPressed, которая реагирует на нажатие клавиши. В этом уроке мы рассмотрим функцию ReadKey. Ее отличие от функции KeyPressed в том, что она не просто реагирует на нажатие клавиши, но и сообщает о том, какая именно клавиша была нажата.

Если данная функция встречается в программе, то программа останавливается и ждет нажатие клавиши, причем символ нажатой клавиши не высвечивается на экране. Функция ReadKey считывает код введенного символа из буфера клавиатуры и возвращает значение типа CHAR. Например, если вы введете с клавиатуры строчную латинскую букву «a», то функция ReadKey возвратит значение Chr(97). Рассмотрим программу, которая показывает отличие функции ReadKey от процедуры Readln.

Функция ReadKey.






program crt2;
uses crt;
var klav:char;
begin
clrscr;
readln(klav);
writeln('Введен симол ',klav);
readln;
end.


В строке №6 вводим с клавиатуры символ.

В строке №7 выводим символ на экран.

funkciya readkey

funkciya readkey.

Как видите при вводе символа с клавиатуры, он сразу же отображается на экране, а после нажатия клавиши Enter на экран выводится сообщение.
Теперь заменим строку №6 на такую: klav:=readkey.



program crt2;
uses crt;
var klav:char;
begin
clrscr;
klav:=readkey;
writeln('Введен симол ',klav);
readln;
end.


В строке №6 в переменную «klav» записываем значение функции ReadKey. На этом этапе программа останавливается и ждет нажатия клавиши (как и при использовании процедуры Readln). После нажатия клавиши код этой клавиши будет возвращен в качестве значения функции ReadKey (как и при использовании процедуры Readln) и записан в переменную «klav». На экран будет выведен символ соответствующий этому коду.

funkciya readkey..

funkciya readkey...

Как видите, при нажатии клавиши, у нас сразу вывелось сообщение.


Предыдущая статья : Функция KeyPressed.

Оглавление : Уроки Паскаль. Модуль CRT.

Следующая статья : Записи в Паскаль.


Комментарии  

 
-14 # azaza 11.03.2014 09:05
:lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :lol: :D ;-) :-| :-* :sad: :roll: :oops: :oops: :-* :-* 8) :cry: :eek: :sigh:
 
 
-6 # Dosbol 08.11.2014 09:26
:D :lol: :-) ;-) 8) :-| :-* :oops: :sad: :cry: :o :-? :-x :eek: :zzz :P :roll: :sigh:
 
 
+5 # Yush 11.12.2014 16:54
Можно немного подробнее о функции ReadKey, подробнее о ее работе: чтение и передача, ее промежуточные действия? Спасибо!
 
 
0 # Luck 12.07.2015 12:48
Як можна написати программу наприклад щоб при натисненні букви W виводилось на екран "Успіх"?
 
 
+1 # Иван 25.08.2015 14:57
uses crt;
var
a:char;
begin
a:=readkey;
if a='w' then
writeln('Успіх')
end.
 
 
+2 # boris 26.11.2017 08:26
chto takoi readkey aniktamasi kk koi
 
   ГлавнаяПаскальМодуль CRT в ПаскальФункция ReadKey.