"WikiTestPage"의 두 판 사이의 차이
둘러보기로 가기
검색하러 가기
Onionmixer (토론 | 기여) (테스트 템플릿 추가) |
Onionmixer (토론 | 기여) (테스트작성) |
||
10번째 줄: | 10번째 줄: | ||
* [[Template:ThumbupIcon|추천아이콘]] | * [[Template:ThumbupIcon|추천아이콘]] | ||
{{ThumbupIcon}}이렇게 아이콘이 나오게 할 수 있습니다. | {{ThumbupIcon}}이렇게 아이콘이 나오게 할 수 있습니다. | ||
+ | |||
+ | |||
+ | <syntaxhighlight lang="pascal"> | ||
+ | Program Types; | ||
+ | |||
+ | {$mode objfpc}{$H+} | ||
+ | |||
+ | uses | ||
+ | {$IFDEF UNIX}{$IFDEF UseCThreads} | ||
+ | cthreads, | ||
+ | {$ENDIF}{$ENDIF} | ||
+ | Classes | ||
+ | |||
+ | begin | ||
+ | Writeln(‘Byte: Size = ’, SizeOf(Byte), | ||
+ | ‘, Minimum value = ‘, Low(Byte), ‘ Maximum value = ‘, | ||
+ | High(Byte)); | ||
+ | |||
+ | Writeln(‘Integer: Size = ’, SizeOf(Integer), | ||
+ | ‘, Minimum value = ‘, Low(Integer), ‘ Maximum value = ‘, | ||
+ | High(Integer)); | ||
+ | |||
+ | Write(‘Press enter key to close’); | ||
+ | Readln; | ||
+ | end. | ||
+ | </syntaxhighlight> |
2013년 3월 20일 (수) 13:53 기준 최신판
- 여기는 MediaWiki의 문법 테스트페이지 입니다.
Program Types;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes
begin
Writeln(‘Byte: Size = ’, SizeOf(Byte),
‘, Minimum value = ‘, Low(Byte), ‘ Maximum value = ‘,
High(Byte));
Writeln(‘Integer: Size = ’, SizeOf(Integer),
‘, Minimum value = ‘, Low(Integer), ‘ Maximum value = ‘,
High(Integer));
Write(‘Press enter key to close’);
Readln;
end.