StartprogrammingusingObjectPascal:KeyboardProgram - Revision history

Onionmixer: 번역수정

2013-04-04T05:44:00Z

번역수정

New page

===키보드 프로그램===

이 예제에서는 키보드로부터 문자를 받아서 프로그램이 키보드의 입력 받은 키에 대한 키보드의 줄 번호를 알려줄 것입니다.

<syntaxhighlight lang="pascal">
var
Key: Char;
begin
Write('Please enter any English letter: ');
Readln(Key);
Writeln;

case Key of
'q', 'w', 'e', 'r', 't', 'y', 'u', 'i', 'o', 'p':
Writeln('This is in the second row in keyboard');
'a', 's', 'd', 'f', 'g', 'h', 'j', 'k', 'l':
Writeln('This is in the third row in keyboard');
'z', 'x', 'c', 'v', 'b', 'n', 'm':
Writeln('This is in the fourth row in keyboard');
else
Writeln('Unknown letter');
end;

Write('Press enter key to close');
Readln;
end.
</syntaxhighlight>

참고로, case 조건문에 값 들의 집합이라는 새로운 기술을 사용했습니다.

<syntaxhighlight lang="pascal">
'z', 'x', 'c', 'v', 'b', 'n', 'm':
</syntaxhighlight>

이는 Key가 이 값들의 집합 ('''z''', '''x''', '''c''', '''v''', '''b''', '''n''', '''m''') 중 하나라면 case 분기 구문을 실행한다는 의미입니다.

또한 다음과 같이 범위와 값을 혼용할 수 있습니다.

<syntaxhighlight lang="pascal">
'a'.. 'd', 'x', 'y', 'z':
</syntaxhighlight>

이는 값이 '''a'''와 '''d''' 사이에 있거나 '''x''', '''y''', '''z'''와 같을 경우 구문을 실행한다는 의미입니다.

[[Category:StartprogrammingusingObjectPascal]]

Onionmixer: spop 키보드프로그램 페이지 추가

2012-07-21T09:28:28Z

spop 키보드프로그램 페이지 추가

New page

===키보드 프로그램===

이 예제에서는 키보드로부터 문자를 받아서 프로그램이 키보드의 입력 받은 키에 대한 줄 번호를 알려줄 것입니다.

<syntaxhighlight lang="pascal">
var
Key: Char;
begin
Write('Please enter any English letter: ');
Readln(Key);
Writeln;

case Key of
'q', 'w', 'e', 'r', 't', 'y', 'u', 'i', 'o', 'p':
Writeln('This is in the second row in keyboard');
'a', 's', 'd', 'f', 'g', 'h', 'j', 'k', 'l':
Writeln('This is in the third row in keyboard');
'z', 'x', 'c', 'v', 'b', 'n', 'm':
Writeln('This is in the fourth row in keyboard');
else
Writeln('Unknown letter');
end;

Write('Press enter key to close');
Readln;
end.
</syntaxhighlight>

참고로, case 조건문에 새로운 기술을 사용했는데, 그것은 값들의 집합입니다.
<syntaxhighlight lang="pascal">
'z', 'x', 'c', 'v', 'b', 'n', 'm':
</syntaxhighlight>

이는 Key가 이 값들의 집합 (z, x, c, v, b, n, m) 중 하나라면 case 분기 구문을 실행한다는 의미입니다.

또한 다음과 같이 범위와 값을 혼용할 수 있습니다.
<syntaxhighlight lang="pascal">
'a'.. 'd', 'x', 'y', 'z':
</syntaxhighlight>

이는 값이 a와 d 사이에 있거나 x, y, z와 같을 경우 구문을 실행한다는 의미입니다.
[[Category:StartprogrammingusingObjectPascal]]