Nümunə. Kəsr tipli dəyişəni tam tipli dəyişənə mənimsədən kod.
tam x; kesr y;
//kesr tiple y-e her-hansi qiymet menimsedek
xaricet ("y-in qiymetini daxil edin. \y" ); daxilet (y );
//tam tipli x -e kesr tipinden olan y-i menimsedek
//bu menimsedilme zamani x -e y-in ancaq tam hissesi
// menimsedilir x = y;
//x ve y -i cap edek xaricet ("x = " , x , "\y" );
xaricet("y = ", y, "\y");
Nəticə:
y-in qiymetini daxil edin. 34.876071
x = 34
y = 34.876071
Bu qaydadan istifadə edib kesr ededin qalıq hissəsini onluq kəsr şəkildə ala bilərik, aşağıdakı koda baxaq:
Nümunə. Kəsrin qalıq hissəsni onluq kəsr şəklində çap edən proqram.
tam x; kesr y, z;
//kesr tiple y-e her-hansi qiymet menimsedek xaricet("y-in qiymetini daxil edin. \y"); daxilet(y);
//evvelce y-in tam tam hissesini tapaq
// bunun ucun onu tam tipli xdeyishenine
// menimsedirik x = y;
//y-in qaliq hissesini tapmaq ucun ondan
//tam hissesini cixib neticeni bashqa
// kesr tipli deyishene menimsetmeliyik z = y - x;
// tam ve kesr hisseleri cap edek
xaricet("tam hisse = ",x ,"\yqaliq hisse = ", z, "\y");
Nəticə:
y-in qiymetini daxil edin. 65.087921
tam hisse = 65
qaliq hisse = 0.087921
Simvol və Tam tip
Simvol və tam tipli dəyişənləri bir birinə mənimsədə bilərik. Əsrin dili C ailəsi dillərinə məxsus olduğundan C ailəsi dillərində (Java, C++, C#, Php v.s. ) oldu]u kimi simvol tipli dəyişənləri tam tipli dəyişənlər əvəzinə işlədə bilərik. Əslində simvol tipi tam tiplidəyişənlər kimi realizə olunub və hər bir simvolun ədəd qarşılığı var, sadəcə çap edərkən simvol tipli dəyişənlər öz ədəd qarşılığı ilə deyil simvol qarşılığı ilə çap olunurlar. Biz isə proqramımızla istənilən simvolun ədəd qarşılığını tapa bilərik. Bunun üçün ədəd qarşılığını tapmaq istədiyimiz simvolu tam tipli dəyişənə mənimsətməliyik, aşağıdakı nümunədə bu göstərilir.
Nümunə: Simvolların ədəd qarşılıqlarını tapan kod.
tam x1, x2, x3, x4, x5; simvol s1, s2, s3, s4, s5;
xaricet("5 simvol daxil edin. \y"); daxilet(s1, s2, s3, s4, s5);
//simvollarin eded qarshiligini tapmaq ucun
//onlari tam tipli deyishenlere menimsedek x1 = s1;
x2 = s2; x3 = s3; x4 = s4; x5 = s5;
//simvolun eded qarshiliqin cap edek
xaricet("Daxil etdiyiniz simvollarin eded qarshiliqlari: \y"); xaricet(s1, "\t", x1, "\y");
xaricet(s2, "\t", x2, "\y");
xaricet(s3, "\t", x3, "\y");
xaricet(s4, "\t", x4, "\y");
xaricet(s5, "\t", x5, "\y");
Nəticə:
5 simvol daxil edin.
+ ! = A 9
Daxil etdiyiniz simvollarin eded qarshiliqlari:
+ 43
! 33
= 61
A 65
9 57
Simvolların (ASCİİ) ədədl qarşılığını əks etdirən cədvəl fix Əlavə A –da verilib.
Mövzu11
Sadə cəbri ifadələr. Sağ tərəfdədəyişənlərdən istifadə. Dəyişənin öz qiymətindən istifadə etmək.
Dostları ilə paylaş: | 
