<?xml version="1.0"?>
<feed xmlns="http://www.w3.org/2005/Atom" xml:lang="en">
	<id>https://trans.onionmixer.net/wiki/index.php?action=history&amp;feed=atom&amp;title=StartprogrammingusingObjectPascal%3AVariables</id>
	<title>StartprogrammingusingObjectPascal:Variables - Revision history</title>
	<link rel="self" type="application/atom+xml" href="https://trans.onionmixer.net/wiki/index.php?action=history&amp;feed=atom&amp;title=StartprogrammingusingObjectPascal%3AVariables"/>
	<link rel="alternate" type="text/html" href="https://trans.onionmixer.net/wiki/index.php?title=StartprogrammingusingObjectPascal:Variables&amp;action=history"/>
	<updated>2026-06-16T22:14:09Z</updated>
	<subtitle>Revision history for this page on the wiki</subtitle>
	<generator>MediaWiki 1.43.3</generator>
	<entry>
		<id>https://trans.onionmixer.net/wiki/index.php?title=StartprogrammingusingObjectPascal:Variables&amp;diff=149&amp;oldid=prev</id>
		<title>Onionmixer: 스타일 수정 및 번역수정</title>
		<link rel="alternate" type="text/html" href="https://trans.onionmixer.net/wiki/index.php?title=StartprogrammingusingObjectPascal:Variables&amp;diff=149&amp;oldid=prev"/>
		<updated>2013-04-04T05:08:39Z</updated>

		<summary type="html">&lt;p&gt;스타일 수정 및 번역수정&lt;/p&gt;
&lt;a href=&quot;https://trans.onionmixer.net/wiki/index.php?title=StartprogrammingusingObjectPascal:Variables&amp;amp;diff=149&amp;amp;oldid=148&quot;&gt;Show changes&lt;/a&gt;</summary>
		<author><name>Onionmixer</name></author>
	</entry>
	<entry>
		<id>https://trans.onionmixer.net/wiki/index.php?title=StartprogrammingusingObjectPascal:Variables&amp;diff=148&amp;oldid=prev</id>
		<title>Onionmixer: BR 수정</title>
		<link rel="alternate" type="text/html" href="https://trans.onionmixer.net/wiki/index.php?title=StartprogrammingusingObjectPascal:Variables&amp;diff=148&amp;oldid=prev"/>
		<updated>2013-01-05T05:21:57Z</updated>

		<summary type="html">&lt;p&gt;BR 수정&lt;/p&gt;
&lt;p&gt;&lt;b&gt;New page&lt;/b&gt;&lt;/p&gt;&lt;div&gt;===변수===&lt;br /&gt;
&lt;br /&gt;
변수는 데이터 저장소입니다.  예를 들어, 우리가 X = 5라고 했다면, X는 변수이며, 여기에 값 5가 들어있음을 의미합니다.&lt;br /&gt;
&lt;br /&gt;
오브젝트 파스칼은 강타입 (강력하게 타입이 지정된 strongly typed) 언어이며, 이는 값을 변수에 넣기 전에 변수의 형을 선언해야 함을 의미합니다. X를 정수형으로 선언했다면, 프로그램이 실행하는 동안 X에 정수형 숫자만 넣어야 합니다.&lt;br /&gt;
&lt;br /&gt;
다음은 변수를 선언하고 사용하는 예시입니다:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
Program FirstVar;&lt;br /&gt;
&lt;br /&gt;
{$mode objfpc}{$H+}&lt;br /&gt;
&lt;br /&gt;
uses&lt;br /&gt;
    {$IFDEF UNIX}{$IFDEF UseCThreads}&lt;br /&gt;
    cthreads,&lt;br /&gt;
    {$ENDIF}{$ENDIF}&lt;br /&gt;
    Classes&lt;br /&gt;
    { you can add units after this };&lt;br /&gt;
&lt;br /&gt;
var&lt;br /&gt;
    x:  Integer;&lt;br /&gt;
begin&lt;br /&gt;
    x:= 5;&lt;br /&gt;
    Writeln(x * 2);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
우리는 프로그램의 출력에서 10을 볼 수 있을 것입니다.&amp;lt;BR&amp;gt;&lt;br /&gt;
참고로,  다음 줄이 선언문이 됨을 의미하는 &amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;var&amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;라는 예약어를 사용했습니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
x:  Integer;&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
이것은 다음 두가지를 의미합니다.&lt;br /&gt;
&lt;br /&gt;
 1. 변수의 이름은 &amp;#039;&amp;#039;&amp;#039;X&amp;#039;&amp;#039;&amp;#039; 이고 &lt;br /&gt;
 1. 이 변수의 형식은 분수 부분을 제외한 정수 숫자값만 지닐 수 있는 &amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;Integer&amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;입니다. 이는 양수 값처럼 음수 값도 지닐 수 있습니다.&lt;br /&gt;
&lt;br /&gt;
그리고 다음 구문은&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
x:= 5;&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
값 5를 변수 X에 넣음을 의미합니다.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
다음 예제에서는 변수 y를 추가해보았습니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
var&lt;br /&gt;
    x, y:  Integer;&lt;br /&gt;
begin&lt;br /&gt;
    x:= 5;&lt;br /&gt;
    y:= 10;&lt;br /&gt;
    Writeln(x * y);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
위의 프로그램에 대한 출력은&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;c&amp;quot;&amp;gt;&lt;br /&gt;
50&lt;br /&gt;
Press enter key to close&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
50은 식 ( x * y ) 의 결과입니다.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
다음 예제를 통해 &amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;character&amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;라는 새로운 데이터 형을 소개합니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
var&lt;br /&gt;
    c:  Char;&lt;br /&gt;
begin&lt;br /&gt;
    c:= ‘M’;&lt;br /&gt;
    Writeln(‘My first letter is: ’, c);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
이 형식은 값과 같은 것이 아닌 단 하나의 문자나 문자 형태의 숫자를 지닐 수 있습니다.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
다음 예제에서는 분수 부분을 지닐 수 있는 &amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;real&amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039; 숫자 형을 소개합니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
var&lt;br /&gt;
    x:  Single;&lt;br /&gt;
begin&lt;br /&gt;
    x:= 1.8;&lt;br /&gt;
    Writeln(‘My car engine capacity is  ’, x, ‘ liters’);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
좀 더 상호적인 유연한 프로그램을 작성하려면 사용자로부터 입력을 받아들일 필요가 있습니다.&amp;lt;BR&amp;gt;&lt;br /&gt;
예를 들어, 사용자에게 숫자를 입력해달라고 요청하고, Readln 구문 / 프로시저를 통해 사용자의 입력으로부터 숫자를 가져올 수 있습니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
var&lt;br /&gt;
    x:  Integer;&lt;br /&gt;
begin&lt;br /&gt;
    Write(‘Press enter key to close’);&lt;br /&gt;
    Readln(x);&lt;br /&gt;
    Writeln(‘You have entered:  ’, x);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
이 예제에서는, 프로그램에서 상수 값을 받아들이는 대신에 키보드를 통해 X에 값을 할당했습니다.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
아래 예제에서는 사용자가 입력한 값에 대한 곱셈표를 보여줍니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
Program MultTable;&lt;br /&gt;
&lt;br /&gt;
{$mode objfpc}{$H+}&lt;br /&gt;
&lt;br /&gt;
uses&lt;br /&gt;
    {$IFDEF UNIX}{$IFDEF UseCThreads}&lt;br /&gt;
    cthreads,&lt;br /&gt;
    {$ENDIF}{$ENDIF}&lt;br /&gt;
    Classes&lt;br /&gt;
    { you can add units after this };&lt;br /&gt;
&lt;br /&gt;
var&lt;br /&gt;
    x:  Integer;&lt;br /&gt;
begin&lt;br /&gt;
&lt;br /&gt;
    Write(‘Please input any number: ’);&lt;br /&gt;
    Readln(x);&lt;br /&gt;
    Writeln(x, ‘ * 1 = ’ ,x * 1);&lt;br /&gt;
    Writeln(x, ‘ * 2 = ’ ,x * 2);&lt;br /&gt;
    Writeln(x, ‘ * 3 = ’ ,x * 3);&lt;br /&gt;
    Writeln(x, ‘ * 4 = ’ ,x * 4);&lt;br /&gt;
    Writeln(x, ‘ * 5 = ’ ,x * 5);&lt;br /&gt;
    Writeln(x, ‘ * 6 = ’ ,x * 6);&lt;br /&gt;
    Writeln(x, ‘ * 7 = ’ ,x * 7);&lt;br /&gt;
    Writeln(x, ‘ * 8 = ’ ,x * 8);&lt;br /&gt;
    Writeln(x, ‘ * 9 = ’ ,x * 9);&lt;br /&gt;
    Writeln(x, ‘ * 10 = ’ ,x * 10);&lt;br /&gt;
    Writeln(x, ‘ * 11 = ’ ,x * 11);&lt;br /&gt;
    Writeln(x, ‘ * 12 = ’ ,x * 12);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
참고로 앞의 예제에서 작은 따옴표(‘) 사이에 있는 모든 텍스트는 콘솔 윈도우에 그대로 보여줍니다.&amp;lt;BR&amp;gt;&lt;br /&gt;
예를 들면 다음과 같습니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;c&amp;quot;&amp;gt;&lt;br /&gt;
&amp;#039;  *  1  =  &amp;#039;&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
작은 따옴표에 둘러싸이지 않은 변수와 수식은 계산되며 값으로 기록합니다.&lt;br /&gt;
&lt;br /&gt;
다음 두 구문의 차이점을 보도록 합니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
Writeln(&amp;#039; 5 * 3 &amp;#039;);&lt;br /&gt;
Writeln(5 * 3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
첫번째 구문의 결과는 다음과 같습니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;c&amp;quot;&amp;gt;&lt;br /&gt;
5 * 3&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
두번째 구문은 계산된 다음의 결과를 표시합니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;c&amp;quot;&amp;gt;&lt;br /&gt;
15&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
다음 예제에서는 두 숫자들 (x, y) 에 대한 수학적 계산을 수행하고, 이 결과를 세번째 변수 (Res)에 넣을 것입니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
var&lt;br /&gt;
    x, y:  Integer;&lt;br /&gt;
    Res:  Single;&lt;br /&gt;
begin&lt;br /&gt;
&lt;br /&gt;
    Write(‘Input a number: ’);&lt;br /&gt;
    Readln(x);&lt;br /&gt;
    Write(‘Input another number: ’);&lt;br /&gt;
    Readln(y);&lt;br /&gt;
    Res:= x / y;&lt;br /&gt;
    Writeln(x, ‘ / ’ , y , ‘ = ’ , Res);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
나누기 연산을 수행하면, 분수가 붙은 숫자 결과가 나올 수 있기 때문에 결과 변수(Res)를 실수(&amp;#039;&amp;#039;Single&amp;#039;&amp;#039;)로 선언했습니다. &amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;Single&amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;은 단순 정밀도 실수를 의미합니다.&lt;br /&gt;
&lt;br /&gt;
[[Category:StartprogrammingusingObjectPascal]]&lt;/div&gt;</summary>
		<author><name>Onionmixer</name></author>
	</entry>
	<entry>
		<id>https://trans.onionmixer.net/wiki/index.php?title=StartprogrammingusingObjectPascal:Variables&amp;diff=146&amp;oldid=prev</id>
		<title>Onionmixer: SPOP 변수 페이지 추가</title>
		<link rel="alternate" type="text/html" href="https://trans.onionmixer.net/wiki/index.php?title=StartprogrammingusingObjectPascal:Variables&amp;diff=146&amp;oldid=prev"/>
		<updated>2012-07-21T09:08:03Z</updated>

		<summary type="html">&lt;p&gt;SPOP 변수 페이지 추가&lt;/p&gt;
&lt;p&gt;&lt;b&gt;New page&lt;/b&gt;&lt;/p&gt;&lt;div&gt;===변수===&lt;br /&gt;
&lt;br /&gt;
변수는 데이터 저장소입니다.  예를 들어, 우리가 X = 5라고 했다면, X는 변수이며, 여기에 값 5가 들어있음을 의미합니다.&lt;br /&gt;
&lt;br /&gt;
오브젝트 파스칼은 강타입 (강력하게 타입이 지정된 strongly typed) 언어이며, 이는 값을 변수에 넣기 전에 변수의 형식을 선언할 것임을 의미합니다. X를 정수형으로 선언했다면, 프로그램이 실행하는 동안 X에 정수형 숫자만 넣어야 합니다.&lt;br /&gt;
&lt;br /&gt;
다음은 변수를 선언하고 사용하는 예시입니다:&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
Program FirstVar;&lt;br /&gt;
&lt;br /&gt;
{$mode objfpc}{$H+}&lt;br /&gt;
&lt;br /&gt;
uses&lt;br /&gt;
    {$IFDEF UNIX}{$IFDEF UseCThreads}&lt;br /&gt;
    cthreads,&lt;br /&gt;
    {$ENDIF}{$ENDIF}&lt;br /&gt;
    Classes&lt;br /&gt;
    { you can add units after this };&lt;br /&gt;
&lt;br /&gt;
var&lt;br /&gt;
    x:  Integer;&lt;br /&gt;
begin&lt;br /&gt;
    x:= 5;&lt;br /&gt;
    Writeln(x * 2);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
우리는 프로그램의 출력에서 10을 볼 수 있을 것입니다.[[BR]]&lt;br /&gt;
참고로,  다음 줄이 선언문이 됨을 의미하는 &amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;Var&amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;라는 예약어를 사용했습니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
x:  Integer;&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
이것은 다음 두가지를 의미합니다.&lt;br /&gt;
&lt;br /&gt;
 1. 변수의 이름은 &amp;#039;&amp;#039;&amp;#039;X&amp;#039;&amp;#039;&amp;#039; 이고 &lt;br /&gt;
 1. 이 변수의 형식은 분수 부분을 제외한 정수 숫자값만 지닐 수 있는 &amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;Integer&amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;입니다. 이는 양수 값처럼 음수 값도 지닐 수 있습니다.&lt;br /&gt;
&lt;br /&gt;
그리고 다음 구문은&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
x:= 5;&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
값 5를 변수 X에 넣음을 의미합니다.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
다음 예제에서는 변수 y를 추가해보았습니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
var&lt;br /&gt;
    x, y:  Integer;&lt;br /&gt;
begin&lt;br /&gt;
    x:= 5;&lt;br /&gt;
    y:= 10;&lt;br /&gt;
    Writeln(x * y);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
위의 프로그램에 대한 출력은&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;c&amp;quot;&amp;gt;&lt;br /&gt;
50&lt;br /&gt;
Press enter key to close&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
50은 식 ( x * y ) 의 결과입니다.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
다음 예제를 통해 &amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;character&amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;라는 새로운 데이터 형식을 도입합니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
var&lt;br /&gt;
    c:  Char;&lt;br /&gt;
begin&lt;br /&gt;
    c:= ‘M’;&lt;br /&gt;
    Writeln(‘My first letter is: ’, c);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
이 형식은 값과 같은 것이 아닌 단 하나의 문자나 문자 형태의 숫자를 가질 수 있습니다.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
다음 예제에서는 분수 부분을 지닐 수 있는 &amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;real&amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039; 숫자 형식을 도입합니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
var&lt;br /&gt;
    x:  Single;&lt;br /&gt;
begin&lt;br /&gt;
    x:= 1.8;&lt;br /&gt;
    Writeln(‘My car engine capacity is  ’, x, ‘ liters’);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
좀더 상호적이고 유연한 프로그램을 작성하기 위해 사용자로부터 입력을 받아들일 필요가 있습니다.[[BR]]&lt;br /&gt;
예를 들어, 사용자에게 숫자를 입력해달라고 요청하고, Readln 구문 / 프로시저를 통해 사용자의 입력으로부터 숫자를 가져올 수 있습니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
var&lt;br /&gt;
    x:  Integer;&lt;br /&gt;
begin&lt;br /&gt;
    Write(‘Press enter key to close’);&lt;br /&gt;
    Readln(x);&lt;br /&gt;
    Writeln(‘You have entered:  ’, x);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
이 예제에서는, 프로그램에서 상수 값을 받아들이는 대신에 키보드를 통해 X에 값을 할당했습니다.&lt;br /&gt;
&lt;br /&gt;
----&lt;br /&gt;
&lt;br /&gt;
아래 예제에서는 사용자가 입력한 값에 대한 곱셈표를 보여줍니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
Program MultTable;&lt;br /&gt;
&lt;br /&gt;
{$mode objfpc}{$H+}&lt;br /&gt;
&lt;br /&gt;
uses&lt;br /&gt;
    {$IFDEF UNIX}{$IFDEF UseCThreads}&lt;br /&gt;
    cthreads,&lt;br /&gt;
    {$ENDIF}{$ENDIF}&lt;br /&gt;
    Classes&lt;br /&gt;
    { you can add units after this };&lt;br /&gt;
&lt;br /&gt;
var&lt;br /&gt;
    x:  Integer;&lt;br /&gt;
begin&lt;br /&gt;
&lt;br /&gt;
    Write(‘Please input any number: ’);&lt;br /&gt;
    Readln(x);&lt;br /&gt;
    Writeln(x, ‘ * 1 = ’ ,x * 1);&lt;br /&gt;
    Writeln(x, ‘ * 2 = ’ ,x * 2);&lt;br /&gt;
    Writeln(x, ‘ * 3 = ’ ,x * 3);&lt;br /&gt;
    Writeln(x, ‘ * 4 = ’ ,x * 4);&lt;br /&gt;
    Writeln(x, ‘ * 5 = ’ ,x * 5);&lt;br /&gt;
    Writeln(x, ‘ * 6 = ’ ,x * 6);&lt;br /&gt;
    Writeln(x, ‘ * 7 = ’ ,x * 7);&lt;br /&gt;
    Writeln(x, ‘ * 8 = ’ ,x * 8);&lt;br /&gt;
    Writeln(x, ‘ * 9 = ’ ,x * 9);&lt;br /&gt;
    Writeln(x, ‘ * 10 = ’ ,x * 10);&lt;br /&gt;
    Writeln(x, ‘ * 11 = ’ ,x * 11);&lt;br /&gt;
    Writeln(x, ‘ * 12 = ’ ,x * 12);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
참고로 앞의 예제에서 작은 따옴표(‘) 사이에 있는 모든 텍스트는 콘솔 윈도우에 그대로 보여줍니다.[[BR]]&lt;br /&gt;
예를 들어,&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;c&amp;quot;&amp;gt;&lt;br /&gt;
’  *  1  =  ’&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
작은 따옴표에 둘러쌓이지 않은 변수와 수식은 계산되며 값으로 기록합니다.&lt;br /&gt;
&lt;br /&gt;
다음 두 구문의 차이점을 보도록 합니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
Writeln(‘ 5 * 3 ’);&lt;br /&gt;
Writeln(5 * 3);&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
첫번째 구문의 결과는 다음과 같습니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;c&amp;quot;&amp;gt;&lt;br /&gt;
5 * 3&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;c&amp;quot;&amp;gt;&lt;br /&gt;
15&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
다음 예제에서는 두 숫자들 (x, y) 에 대한 수학 연산을 수행하고, 이 결과를 세번재 변수 (Res) 에 넣을 것입니다.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;syntaxhighlight lang=&amp;quot;pascal&amp;quot;&amp;gt;&lt;br /&gt;
var&lt;br /&gt;
    x, y:  Integer;&lt;br /&gt;
    Res:  Single;&lt;br /&gt;
begin&lt;br /&gt;
&lt;br /&gt;
    Write(‘Input a number: ’);&lt;br /&gt;
    Readln(x);&lt;br /&gt;
    Write(‘Input another number: ’);&lt;br /&gt;
    Readln(y);&lt;br /&gt;
    Res:= x / y;&lt;br /&gt;
    Writeln(x, ‘ / ’ , y , ‘ = ’ , Res);&lt;br /&gt;
    Writeln(‘Press enter key to close’);&lt;br /&gt;
    Readln;&lt;br /&gt;
end.&lt;br /&gt;
&amp;lt;/syntaxhighlight&amp;gt;&lt;br /&gt;
&lt;br /&gt;
나누기 연산을 수행하면,  분수가 붙은 숫자 결과가 나올 수 있기 때문에 결과 변수(Res)를 실수(Single)로 선언했습니다. &amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;Single&amp;#039;&amp;#039;&amp;#039;&amp;#039;&amp;#039;은 단순 정밀도 실수를 의미합니다.&lt;br /&gt;
[[Category:StartprogrammingusingObjectPascal]]&lt;/div&gt;</summary>
		<author><name>Onionmixer</name></author>
	</entry>
</feed>