Tasdiqlayman” Qo`shtepa ixtisoslashtirilgan maktabi mmibdo`: S. Egamov

IV. Mustahkamlsh uchun savol va topshiriqlar

1. 
   Read, Write so‘zlari qanday ma’no beradi?
   
2. 
   Ma’lumotlarni muloqot usulida kiritish operatorining vazifasini tushuntiring.
   
3. 
   Nima uchun bu usul ma’lumotlarni muloqot usulda kiritish deb ataladi?
   
4. 
   Ma’lumotlarni kiritish operatorlarining farqi nimada?
   
5. 
   O‘zgaruvchilarga qiymat berishda kiritish operatorining qulaylik tomonini izohlang.
   
6. 
   Kiritish operatoridagi qiymat berilayotgan o’zgaruvchini qanday usulda bilish oson?
   
7. 
   Natijani ko’rib olishda Readln operatori beradigan qulaylikni izohlang.
   

Mashqlar
1. Read operatori yordamida N sonini kvadratini N ning 10; 11; 12; 13; 14; 15 qiymatlarida hisoblash dasturini tuzing.
Var N: byte;
Begin
Write(‘ N ning qiymatini kiriting=’);Readln(N);
N:=N*N: writeln(N); Readln;
End.
2. Quyidagi dasturda a o’zgaruvchining “O’ZBEKISTONIM”; “VATANIM”; “ONA DIYORIM” qiymatlarini xotiraga qulay usulda kiritib natija oling.
Var a, b, g: string;
Begin
Write(‘a ning qiymatini kiriting a=’); readln(a)
b:= ‘ – SAJDAGOH KABI‘; g:= ‘ MUQADDASDIR!‘; write(a, b, g); readln;
End.
V. Uyga vaifa
3. “Matiz” avtomobili joyidan qo’zg’alib T sekundda S metr yo’l bosdi. Uning o’rtacha tezligini (m/s) larda quyidagi qiymatlarda hisoblash dasturini ma’lumotlarni muloqot usulda kiritish orqali tuzing (yo’llanma: V=S/T).
a) T= 10; S= 150; b) T= 12; S= 200; d) T= 20; S=400; e) T= 45; S= 900.
Program tezlik;
Uses crt;
Var v,t,s: real;
Write(‘vaqt T=’); readln(t); write(‘masofa S=’); readln(s);
V:=s/t; writeln(‘O`rtacha tezlik V=’; v);
Readln;
End.
Qabul qildi : MMIDO` _________S.Egamov
Sana:__________________

Mavzu: Ekran bilan ishlash operatorlari

Maqsad:
1) ta’limiy: O`quvchilarga ekran bilan ishlash operatorlari haqida ma’lumo berish;