Turbo Pascal - дағы енгізу және шығару операторлары

an lang="kk-KZ"> курсорды келесі орынға жылжытпай, ол орынға кез келген символ бейнесін шығара алады. Келесі testread2 программасы Read Кеу функциясын пайдаланып, кіші латын әріптерін бас әріптерге түрлендіреді.

Uses CRT;

Var сҺ: cҺar;

Begin

Writeln ('Латын алфавитінің кіші әріптерін енгізіңдер (z-программадан шығу). ');

Repeat

сҺ := Read Кеу;

write (Up Case( сҺ));

until сҺ ='z",

end.

Төмендегі кесте басқару пернелерің немесе олардың комбинацияларының

сканерлеу коды берілген.

Төмендегі scan_codes программасы басылған пернелердың сканерлеу кодын

анықтауға арналған. Ол программамен жұмыс істеу барысында Сtгl + PrtSс (принтерге экрандағы мәліметті шығару) немесе Ctr1+Alt+Del (ДОС-ты· қайта жүктеу) пернелер комбинациясын басу керек емес, ал Ctr1+Break пернелерін басу программа жұмысын тоқтатады.

Uses CRT;

Var сҺ: char;

Begin

Writeln ('Программа символ коды мен сканерлеу кодын анықтайды');

Wrіtеlп('Программа жұмысын тоқтату үшін Ctrl+Break пернелерін басыңдар');

repeat

wrіtеlп('Келесі перне: ');

сҺ: = Read Кеу;

writeln;

if cs <> #0 then

writeln ('Символдық перне. Огd (сҺ) = " Ord(ch))

else