Mavzu: Pascal chiziqli dastur Reja

Yüklə 24,07 Kb.

səhifə	2/5
tarix	21.10.2023
ölçüsü	24,07 Kb.
	#130638

1 2 3 4 5

Pascal chiziqli dastur

Var a,b,c: real; x, y: real; Begin Write(‘ a=’); read(a); Write(‘ b=’); read(b);
Shartsiz o’tish operatori
Program t(output); Label 7; var a,b:real; Begin

у=

tamom

а, в,с, х

у=ах²+bх+с

a=1.21; b=3.12; c=-0.2; x=0.45.

Dasturi quyidagicha bo’ladi.

Program t1(input,output);

Var a,b,c: real;

x, y: real;

Begin

Write(‘ a=’); read(a);

Write(‘ b=’); read(b);

Write(‘ c=’); read(c);

Write(‘ x=’); read(x);

y:=a*SQR(x)+b*x+c;

Writeln(‘ натижа y=’,y);

end.
Натижа y=1.449025

Kurinib turibdiki blok-sxemada bloklar ketma-ket (Chiziqli) bajariliyapdi.

Tarmoqlanuvchi tuzilmali dasturlarni tashkil etishda albatta shart bo’ladi va bu shart bajarilishiga karab algoritmning blok sxemasida tarmoqlanishlar bo’ladi va bir-nechta operatorlar ketma-ketligi tanlanadi.

Shartsiz o’tish operatori
Tarmoqlarni tashkil etish uchun dasturda o’tish, shartli va tanlash operatorlari bo’lishi kerak.

SHartsiz o’tish operatori. SHartsiz o’tish operatorini umumiy ko’rinishi goto n bu yerda goto operator n- metka (satrga quyilgan nomer, belgi) N metka label yordamchi so’zi bilan quyilishi kerak.
Masalan:

Program t(output);

Label 7; var a,b:real;

Begin
……..

goto 7
………

7: a:=b*3
………

end.
Bu yerda boshqarish goto operatori orqali 7-metkaga (nomerga) utkazilayapti.
Metkalar turtta rakamdan oshmagan ishorasiz butun sonlar bo’lib, ular metkalarni tavsiflash bo’limida tavsiflanadilar.

Yüklə 24,07 Kb.

Dostları ilə paylaş: