Pedagogik amaliyot davrida yozgan hisobot daftari

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.