Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Free Pascal Задача D. Алиби https://www.cyberforum.ru/ free-pascal/ thread1010930.html
Всем привет! Сейчас готовлюсь к городской олимпиаде и занимаюсь практикой. Нашел довольно интересную задачу, которая на данный момент мне не по силам. Может быть, на форуме кто-то поможет? ...
несложная программа Free Pascal
Разобрать и отладить код программы, в которой: 1) с помощью типизированной константы вводятся значения элементов целочисленной матрицы M, равные {-13, -41,3,-82,-77,43}, 2) матрица выводится на...
Free Pascal Как регулировать окно редактора в графическом режиме
как регулировать окно редактора в графическом режиме например вот строка благодаря которой окно в графическом режиме открывается не на весь экран компьютера begin clrscr;...
Free Pascal Дополнить записи навигацией по ним Нужно было написать программу с записями о : ФИО работника, подразделениее, зарплаты. Необходимо , чтобы можно было просматривать список сотрудников заданного подразделения по одному человеку с... https://www.cyberforum.ru/ free-pascal/ thread1010480.html
Free Pascal Анимация двумерных изображений https://www.cyberforum.ru/ free-pascal/ thread1010118.html
Как сделать так чтобы отрезки с каждым новым оборотом меняли цвет? uses graph,wincrt; var xc,yc,x,y,x1,y1,x2,y2,x3,y3,x4,y4:integer; a,b,r,u:real; begin initgraph(xc,yc,''); xc:=getmaxX...
Free Pascal Построение ограниченых областей плоскости
Помогите пожалуйста написать программу. Необходимо построить графики функций (каждый график своим цветом). Ту, область, что ограничивают эти графики заштриховать. Построить оси координат.
Free Pascal Сложные задачки
Буду очень признателен, во всех заданиях 13 ВАРИАНТ.Можно еще блок схему) Последние два файлика это одно задание. Если можете объясните еще пожалуйста эти задачи по возможности. Огромное спасибо!))
Free Pascal составьте пожалуйста программу Жюри олимпиады для подведения ее итогов должны определить трех победителей.Составить программу решения задачи,если задана таблица очков,набранных каждым участником , признанных победителями. https://www.cyberforum.ru/ free-pascal/ thread1009721.html
Free Pascal TYPE как правильно записать https://www.cyberforum.ru/ free-pascal/ thread1009601.html
Дано три массива,A,B,C как это записать через type ? подскажите пожалуйста..:) заранее спасибо.
Free Pascal Фрактал Жюлиа program J2; uses Graph, Crt; type TComplex = record X : Real; Y : Real; end; https://www.cyberforum.ru/ free-pascal/ thread1009081.html
3020 / 1908 / 1647
Регистрация: 30.04.2011
Сообщений: 3,054
18.11.2013, 22:11 0

Вывести на экран монитора таблицу кодов сканирования клавиш дополнительной клавиатуры

18.11.2013, 22:11. Просмотров 1407. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Памирыч как решение

Решение


Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
uses
  Crt;
 
var
  c: char;
 
begin
  while c <> #$3B do
  begin
    c := ReadKey;
    Writeln(byte(c));
  end;
end.


Вернуться к обсуждению:
Вывести на экран монитора таблицу кодов сканирования клавиш дополнительной клавиатуры
2
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.11.2013, 22:11
Готовые ответы и решения:

С клавиатуры вводится три случайных буквы, вывести на экран сумму их числовых кодов
С клавиатуры вводится три случайных буквы, вывести на экран сумму их числовых кодов

После ввода с клавиатуры произвольного текста, вывести на экран сумму его ASCII кодов
После ввода с клавиатуры произвольного текста, вывести на экран сумму его ASCII кодов

Вывести коды сканирования клавиш до тех пор, пока не будет нажата клавиша Esc
Написать программу, которая читает и выводит коды сканирования клавишей до тех пор, пока не будет...

Вывести на экран монитора и напечатать таблицу значений аргумента и функции, а также график функции средствами MATHCAD
Вывести на экран монитора и напечатать таблицу значений аргумента и функции, а также график функции...

1
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.