“Informatika va axborot texnologiyalari”



Yüklə 5,01 Kb.
Pdf görüntüsü
səhifə15/103
tarix27.12.2023
ölçüsü5,01 Kb.
#162175
1   ...   11   12   13   14   15   16   17   18   ...   103
PedPsix lar uchun TAYYOR-laboratoriya ishlari (1)

1-
 
masala. 
«Svetofor» 
dan foydalanish algoritmi. 
1)
svetofor chirog’iga qaralsin; 
2)
qizil chiroq yongan bo’lsa, to’xtalsin; 
3)
sariq chiroq yongan bo’lsa, yurishga yoki to’xtashga tayyorlansin; 
yashil chiroq yongan bo’lsa, yurilsin. 
2-
 
masala. 
Y=max(a,b). 
Agar a b shart bajarilsa, u holda a maksimum, aks holda b maksimum bo’ladi. 
3-
 
masala. 
Y=min(a,b). 
Bu yerda agar a b shart bajarilsa u holda b, aks holda a minimum bo’ladi. 
Ketma-ket hisoblash jarayoni deganda biz shuni tushunamizki, ya’ni bizga bir qancha hisoblash ifodalari 
berilgan bo‘lib dastlabki ma’lumotlar berilganda bu ifodalarning son qiymatlarini aniqlashimiz zarur. Bunday 
hisob-kitob ishlarini bajarishda asosiy muhim rol berilgan ifodalarni qanday ketma-ketlikda hisoblash zarurligini 
o‘rnatishdan iboratdir. Buni quyidagi misolda ko‘rib chiqamiz.
Misol. Quyidagi ifodalarning qiymati hisoblansin: 
1.
X = ay + c;
2.
Y = a + 2c
2
;
3.
Z = ax/b – y
3

4.
U = (X + Y)/Q + d;
5.
Q = (2x+3y)/(2+Z
2
). 
Dastlabki ma’lumotlarni aniqlaymiz. Bizni misolimizda dastlabki, birlamchi ma’lumotlar bo‘lib 
a,b,c,d 
kattaliklarning sonli qiymatlari hisoblanadi. 
Bu ifodalarni hisoblash ketma-ketligi, ya’ni so‘z bilan ifodalanuvchi algoritmi quyidagicha: 
1.
Boshlash; 
2.
Dastlabki ma’lumotlarni, (ya’ni 
a,b,c,d
) EXM xotirasiga kiritish; 
3.
Y = a + 2c
2
ni hisoblash
4.
X = ay + c ni hisoblash; 
5.
Z = ax/b – y
3
ni hisoblash; 
6.
Q = (2x+3y)/(2+Z
2
) ni hisoblash; 
7.
U = (X + Y)/Q + d ni hisoblash; 
8.
Dastlabki ma’lumotlar va hisoblash natijalarini bosib chiqarish; 
9.
Tamomlash. 
Ҳисоблаш алгоритмини 
блок схемаси. 
Pascal тилидаги дастури 


19 
Program ketma-ket_hisoblash
Var a,b,c,d:real; 
x,y,z,u,q:real; 
Begin 
Write (‘a,b,c,d =’); 
Read(a,b,c,d); 
Y:=a+2*c*c; 
X:=a*y+c; 
Z:=a*x/b-y*y*y; 
Q:=(2*x+3*y)/(2+z*z); 
U:=(x+y)/q+d; 
Writeln(a,b,c,d,x,y,z,u,q); 
Readln;
End. 

Yüklə 5,01 Kb.

Dostları ilə paylaş:
1   ...   11   12   13   14   15   16   17   18   ...   103




Verilənlər bazası müəlliflik hüququ ilə müdafiə olunur ©genderi.org 2024
rəhbərliyinə müraciət

    Ana səhifə