Algoritimlash va dasturlash tillari

Dos moduli

Sitemali vakt va kun bilan ishlash protsedura va funksiyalari, DiskFree, DiskSize, Fexpand, FSearch, FindFirst, FindNext, fayl atributlari,
Dos moduli - turli DOS funksiyalarini ishlatish vositalarini o’z ichiga oladi. Bu modulda juda kup protsedura va funksiyalar mavjud , lekin eng kup tarqalganlari va ushbu modulga kirmaydigan protseduralarni ko’rib chiqamiz.
Sistemali kun va vaqt bilan ishlash uchun protsedura va funksiyalar:

procedure SetTime (Hour, Min, Sec,Sec100: word) - sistemali vaqtni o’rnatadi. Bu yerda, Hour - vaqtni beradi, Min - minutlar, Sec - sekundlar, Sec100 - sekundning yuzdan bir bo’lagi.

procedure GetTime(var Hour, Min, Sec, Sec100: Word) - sitemali vaqtni qaytaradi.

qaytarilayotgan o’zgaruvchilarning chegara qiymati : Hour 0..23, Min 0..59, Sec 0..59, i Sec100 0..99.

procedure GetDate(var Year, Month, Day, DayOfWeek: Word) - sitemali kunni qaytaradi. Year - yil, Month- oy , Day - kun, DayOfWeek - xafta kunlari.

qaytarilayotgan o’zgaruvchilarning chegara qiymati: Year 1980..2099, Month 1..12, Day 1..31, i DayOfWeek 0..6 (bu yerda 0 - Yakshanba).


3.EKRAN BILAN ISHLASH OPERATORLARI USTIDA AMALLAR.
1. Ekranga «Yashnasin O'zbekiston» matnini qizil, matn foni rangini ko'k
rangda chiqaring.
Yechilishi:

Program masala_1; Uses crt; Begin Textcolor(red); TextBackGround(blue); Write(‘Yashnasin O'zbekiston’); Readln; End.

2. Ekranga 5 ta kursdoshingizni ismini turli ranglarda va ekranning sariq
rangida chiqaring.
Yechilishi:

Program masala_2; Uses crt; Begin TextBackGround(14); Textcolor(2); Writeln(‘Aqida’); Textcolor(5); Writeln(‘Husanboy’); Textcolor(7); Writeln(‘Karimjon’); Textcolor(9); Writeln(‘Muqaddas’); Textcolor(11); Writeln(‘Dostonbek’); Readln; End.