READ (A);
І:= І+1
END;
WRITELN;
WRITELN (‘I=’,I)
END.
Мәндер бос орын арқылы ажыратыла отырып енгізіледі, яғни 3 5 7 9 11 тізбегі берілсе, дисплей экранына I=5 шығады.
Е с к е р т у. WHILE NOT EOLN DO операторының алдында
міндетті түрде READLN; операторы тұруы қажет.
WRITE (al, а2, аЗ,..., an), WRITELN(al, а2, аЗ,...,ап) операторлары және параметрсіз шығару операторы сандарды шығару операторына ұқсас. Мұндағы al, a2, a3,..., an параметрлері мәндері бүтін, нақты, логикалық және символдық тұрақтылар болуы мүмкін.
Шығару операторындағы мәліметтердің пішімін жазып көрсетуге де, көрсетпеуге де болады. Нәтиже деректердің типіне байланысты болады, егер ол нақты және бүтін типте болса, оған 13 орын, символдық типте болса, 1 орын, ал логикалық типте болса, 4 (TRUE) немесе 5 орын (FALSE) беріледі.
Шығатын нәтиже алдында бос орын қалдыру үшін ‘ ’ белгісі пайдаланылады. Мысалы, WRITE (‘ ‘:5, А: 3, ‘ ‘:7, В: 4) болса, онда нәтиже былай беріледі: 5 бос орыннан соң А-ның мәні үш орын алуы тиіс, одан соң 7 бос орын қалдырылады да, В-ның мәні 4 орынға жазылады.
Символдық тұрақтылар апостроф ішіне қалай жазылса, солай шығарылады.
Достарыңызбен бөлісу: |
