| WRITE ([< файл немесе құрылғы аты >,]R1:N1,R2:N2,…, Rm:Nm); мұндағы - R1,R2,…,R m – шығарылатын айнымалылар атаулары;
N1,N2,…,N m – өріс ендері.
Егер өріс ені мəннен үлкен болса, онда мəндердің сол жағында бос орын қалдырылады. Ал, шығарылатын мəн өріс еніне сыйма-са, онда формат қабылданбайды да, баспаға нақты мəндер толық шығарылады.
Нақты мəндерді шығару ерекшеліктері
Егер нақты типтегі айнымалы сипатталса, онда оны шыға-рудың төмендегідей нұсқаларын пайдалануға болады:
Write(R); Шығару қалыпты түрде іске асырылады (экспо-ненциальды формада):
| − d.dddddddddd E +|− dd
Write(R:N); Бүтін сан шығарудың қалыпты түрі, өріс ұзындығы N, оң жақ шекарасы бойынша тураланған. N-нің ең кіші мəні 8-ге тең. Өріс ені бұдан кіші болған жағдайда, компиля-тор мəндер разрядын 8-ге дейін автоматты түрде өсіреді.
Write(R:N:M); Бекітілген нүкте арқылы шығару, нүктеден кейін М (0<=M<=24) ондық таңба көрсетіледі, мұнда N>M+2 бо-луы тиіс (2 орын – сан таңбасы мен ондық нүкте үшін).
Мысалы,
VAR B,D:REAL;
C:INTEGER;
A:STRING[10];
. . .
A:=’КІТАП’;
B:=1253E-5;
C:=12;
D:=1253E2;
WRITE (LST,’B=’,B:10:3,’ C=’,C:8,‘A=’,A:7,’ B1=’,B:8,‘D=’,D:6);
80
Баспаға (мұндағы _ экранда көрінбейтін бос орын символын білдіреді):
В=_ _ _ _ _ 0.013_С=_ _ _ _ _ _12_А=_ _кітап_B1=_1.3E-02_D=_1.3E+05 түрінде шығарылады.
WRITELN процедурасының шығарылу форматы да осыған ұқсас:
Достарыңызбен бөлісу: |
