Перевод числа из десятичной системы счисления в шестнадцатеричную.

Напишем программу, которая вводит с клавиатуры целое число в диапазоне от 0 до 15 и преобразует его к шестнадцатеричной системе счисления. Напомню, что в шестнадцатеричной системе счисления числа в диапазоне от 0 до 9 соответствуют таким же числам в ...

Операции умножения и сложения в Pascal.

В данном уроке мы рассмотрим операции умножения и сложения в Pascal. Умножение в Pascal обозначается знаком «*», а сложение - знаком «+».

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

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

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

Тип данных Real.

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

Структура программы в Паскаль.

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

В прошлом уроке мы познакомились с функцией 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:
Ответить
 
 
0 # тантум верде форте 04.03.2017 14:17
:-* :-x :eek:
Ответить
 
 
-6 # Dosbol 08.11.2014 09:26
:D :lol: :-) ;-) 8) :-| :-* :oops: :sad: :cry: :o :-? :-x :eek: :zzz :P :roll: :sigh:
Ответить
 
 
+6 # Yush 11.12.2014 16:54
Можно немного подробнее о функции ReadKey, подробнее о ее работе: чтение и передача, ее промежуточные действия? Спасибо!
Ответить
 
 
+2 # Luck 12.07.2015 12:48
Як можна написати программу наприклад щоб при натисненні букви W виводилось на екран "Успіх"?
Ответить
 
 
+2 # Иван 25.08.2015 14:57
uses crt;
var
a:char;
begin
a:=readkey;
if a='w' then
writeln('Успіх')
end.
Ответить
 

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

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

   ГлавнаяПаскальМодуль CRT в Паскаль