а:
WRITE (B мәні , B);
экранда
В мәні 1. 715E01
мысалы:
b айнымалысының бүтін түрдегі мәнін көрсетуWRITE (b:n
Мұндағы b - айнымалының атауы; n – мәні бүтін сан болып келетін тұрақты түрінде берілген орын саны, оны бірден бүтін санмен де жазуға болады. Егер b:5 пішімі беріліп, ал b 56 болса, онда беске дейінгі толтырылмаған орындарға сол жақ шетте бос орын қалдырылады. b 56 мәні үшін
WRITE (b :5)
операторы экранға
« 56»
тіркесін шығарады.
Мысалы:
нақты сан үшін пішім екі саннан тұрады: I – санға берілетін барлық орын. II – үтірден кейін алынатын бөлшек цифрлар саны. Мынадай оператор берілсін делік: WRITE (Y : m: n)Мұндағы m – нәтижеге берілген барлық орын, n – үтірден соңғы бөлшек бөлігіне берілетін орындар саны. Мысалы, C -145. 7865 болғанда WRITE(C:8:3) операторы экранға -145. 786 мәнін шығарады, мұндағы жалпы орындар саны – 8, ал бөлшек үш санмен бейнеленетіндіктен соңғы бір цифр жазылмай қалып отыр.
Егер нақты сан үшін: WRITE (Y , Y:8:3) пішімі берілсе, ал оның мәні Y 1. 76 болса, экраннан Y 1. 760 тіркесі көрінеді.
Айталық X 7, Y 15, Z 11, ал R 450,08
h
v
Ø
d
p
t
v
š
N
f
Ø
ü
䡭п桰
B
B
䡭п桰
䡭ఊ桰
䡭п桰
䡳пጀ жазылуы Экрандағы нәтижесі
Write (X, Y);
Write (X, ,, Y);
Write (X , X);
Write (X, :3,Z );
Write (XY , XY);
Write (Z, -соңы);
Write (бітті);
мысал:
Радиусы R болатын шеңбер ұзындығын есептеу программасын құру қажет.
Шығарылуы:
program B1;
const pi3. 14159;
var
R:real;
L:real;
begin
writeln(R мәнін енгізіңдер:);
read(R);
L:2piR;
writeln(нәтиже:);
writeln(шеңбер ұзындығы L , L:8:3);
Страницы: << < 1 | 2 | 3 | 4 > >>