linkedin facebook linkedin facebook nod32

P Bilan boshlanadigan test savollar

Muallif: Mengliyev Sh.

Qo`shilgan sana: 2015-06-01

P Bilan boshlanadigan test savollar

1. Paskal tilida quyidagi dastur ishga tushurilganda hatolik habarini chiqarmaslik uchun “?” va “??” belgilar o’rniga  qo’yish mumkin bo’lgan (mos ravishda) standart funksiyalar juftligini aniqlang?
Var
a:word;
b:byte;
Begin a:=? (58.2-0.2); b:=?? (a-sqr (10)); write (a,b); end.

Javob: abs, abs

2. Paskal tilida quyidagi dastur qismining bajarilishi natijasida ekranda chiqarilgan axbarotlarni aniqlang:
a:=’uzbekiston’; K:=length (A); write(k,a)

Javob: 10uzbekiston

3. Paskal tilida ketma-ketlik ko’rinishida yozilgan quyidagi massiv elementlari sonini aniqlang:
K[-12.3], K[-12.4], K[-12.5], K[-11.3],…, K[-10.5]

Javob: 9 ta

K[-12.3]=1, K[-12.4]=2, K[-12.5]=3

K[-11.3]=4, K[-11.4]=5, K[-11.5]=6

K[-10.3]=7, K[-10.4]=8, K[-10.5]=9

4. Paskal tilida quyidagi dastur qismining bajarilishi natijasida ekranda chiqarilgan axbarotlarni aniqlang:
X:=sqr (9); y:=trunc(sqrt(19+x));
Write (‘x=’,x); write (‘y=’,y)

Javob: 81,10

5. Paskal tilida quyidagi dastur qismining bajarilishi natijasida ekranda chiqarilgan axbarotlarni aniqlang:
Label a;
Var k,b,c: string[6];
Begin K:=’20’;  b:=’14’; goto a; C:=’01.08’; write(C:2); a: write(K;1,B:2); end.

Javob: 20,14

6. Paskal tilida 50 ta elementdan iborat butun turdagi chiziqli massiv to’g’ri tavsiflangan javobni ko’rsating?

Javob: Var B:array[5..55] of integer;

7. Paskal tilida qaysi javobda A[k]=k formula orqali aniqlangan. an N ta elementli massivning elementlari qiymatini kamayish tartibida ekranga chiqaruvchi dastur lavhasi yozilgan?

Javob: For x:= N doWnto 1 do Writeln(A[x]);

8. proba.txt fayli joylashgan papkani ko’rsating: C:\doc\proba.txt

Javob: Doc

9. Paskal tilida haqiqiy va manfiy A, butun va juft B, mantiqiy G va belgili M o‘zgaruvchilar tavsifi to‘g‘ri berilgan javobni aniqlang.

Ma'lumotlar tipi

Javob: Var A: real; B: integer; G: boolean; M: char;

10. Paskal tilida quyidagi dastur qismining bajarilishi natijasida ekranga chiqariladigan axborotlarni aniqlang: 
a:=’eksperiment’; delete(a,1,3); write(‘a=’,a);

Javob: a=periment

11. Paskal tilida quyidagi dastur bajarilishi natijasida ekranga chiqariladigan axborotlarni aniqlang: 
Var k,b:integer; c:string; 
Begin K:=4; B:=5; C:= ‘21‘;
If k>b then
write (‘C=‘, C:1)
else
write (‘C=‘, C:4);
end.

Javob: C=21

12. Paskal tilida ketma-ketlik ko‘rinishida yozilgan quyidagi massiv elementlari sonini aniqlang: 
S[10,5], S[10,4], S[10,3], S[9,5],..., S[5,3]

Javob: 18

K[10,5]=1, K[10,4]=2, K[10,3]=3

K[9,5]=4, K[9,4]=5, K[9,3]=6

K[8,5]=7, K[8,4]=8, K[8,3]=9

K[7,5]=10, K[7,4]=11, K[7,3]=12

K[6,5]=13, K[6,4]=14, K[6,3]=15

K[5,5]=16, K[5,4]=17, K[5,3]=18

13. Paskal tilidagi quyidagi dastur natijasini aniqlang: 
Var a, k: integer; 
Begin a:= –2; For k:= –5 to 1 do a:=(–2)*a; write(a); end.

Javob: dastur xato 64 chiqadi undayam ishlasa nima uchun testlar xato kim tuzayotibdi bilmadim savodi qancha ekan?

14. Paskal tilining quyidagi takrorlash operatoridagi takrorlanishlar sonini aniqlang: 
For i:= -17 downto -1 do write(‘talaba’);

Javob: 17

15. Paskal tilidagi quyidagi dastur ishga tushirilganda xatolik xabarini chiqardi: 
Var a:byte; b:char; 
Begin a:=5*2; b:= ‘A‘;
if a<=15 then a:=a/2 else b:= ‘A‘; write(a); 
End. 
Xatolikka sabab bo‘lgan qismni aniqlang.

Javob: a:=a/2 haqiqiy tipni real so`raydi

16.Paskal tilida quyidagi dastur bajarilishi natijasida ekranga chiqariladigan axborotlarni aniqlang:
Label a;
Var k,b,c:string[6];
Begin K:=‘20‘; B:= ‘14‘; goto a; C:= ‘01.08.‘;write(C:2); a: write(K:1,B:2); end.

Javob: 2014

1698 marta o`qildi.

Foydalanuvchi ismi: oybek
Qo`shilgan sana: 2015-06-17

javoblarini bazilari xato

Foydalanuvchi ismi: oybek
Qo`shilgan sana: 2015-06-17

javoblarizni bazilari xato Javob: Savol berilgan lekin savol hato ishlab ko`rdim chiqmaydi misol javob ham to`g`ri kelmaydi

Foydalanuvchi ismi: Quvondiq
Qo`shilgan sana: 2015-07-31

Paskal tilidagi quyidagi dastur ishga tushirilganda xatolik xabarini chiqardi: Var a:byte; b:char; Begin a:=5*2; b:= ‘A‘; if a<=15 then a:=a/2 else b:= ‘A‘; write(a); End. Xatolikka sabab bo‘lgan qismni aniqlang? anashu masalani topolmadim shuni topib bering?Javob: a=10 bo`ladi 10=15 ga bo`lsa else ishlaydi b:=A bo`lishi kerak?

Parol:
Eslab qolish.


Ro`yhatdan o`tish

testing

+998915878681

Siz o`z maxsulotingizni 3D reklama ko`rinishda bo`lishini xohlaysizmi? Unda xamkorlik qilamiz.

3D Reklama


Рейтинг@Mail.ru
Рейтинг@Mail.ru

Besucherzahler
счетчик посещений