☰ Mundarija · Informatika

RadioGroup

Darslar 53–54 · 2 ta dars · N. I. Taylaqov (umumiy muharrir), A. B. Axmedov, M. D. Pardayeva, A. A. Abdug‘aniyev, U. M. Mirsanov. Informatika va axborot texnologiyalari, 10-sinf, 1-nashr. «Extremum-Press», Toshkent, 2017
54

Amaliy mashg‘ulot

Darslik: 120–121-betlar
MaqsadRadioGroup bilan mini-test va to‘lov turi ilovalarini yaratadi, javobni ItemIndex bilan tekshiradi va ballni hisoblaydi.
Yangi so‘zlar
to‘g‘ri javob raqami · number of the correct answer: the ItemIndex that matches the right optionball · score: the number of correct answerschegirma · discount: a part of the price that is not paidfoiz · percent: a hundredth part
Tushuntirish

Amaliy mashg‘ulotda ikkita ilova yaratiladi. 1) «Mini-test»: uchta RadioGroup, har birida to‘rtta javob variantidan bittasi to‘g‘ri. Tugma bosilganda s := 0; if RadioGroup1.ItemIndex = 1 then s := s + 1; … va oxirida Label1.Caption := 'Ball: ' + IntToStr(s) + ' / 3'; chiqadi. Savollarni o‘zingiz o‘ylab toping va to‘g‘ri javob raqamini dasturda tekshirishdan oldin daftarga yozing. 2) «To‘lov turi»: RadioGroup da Naqd pul (0), Karta (1), Pul o‘tkazma (2) variantlari; naqd to‘lovda 5% chegirma beriladi: narx 200000 bo‘lsa, s := 200000 * 95 div 100 (butun son bo‘linishi). Xarid va to‘lov ilovalarida haqiqiy karta raqamlari yoki parollarni so‘ramang va saqlamang: bu faqat o‘quv namunasi.

Namunalar
Savollar: 1) 2+3*4 = ? (20, 14, 24, 12) – to‘g‘ri ItemIndex = 1; 2) 15 mod 4 = ? (0, 1, 2, 3) – to‘g‘ri ItemIndex = 3; 3) Length('Delphi') = ? (5, 6, 7, 8) – to‘g‘ri ItemIndex = 1. Foydalanuvchi 1, 3, 0 ni tanlasa, birinchi ikkitasi to‘g‘ri: Ball: 2 / 3.
Narx 200000, naqd to‘lov: 200000 * 95 div 100 = 190000; chegirma 10000. Karta yoki o‘tkazmada narx o‘zgarmaydi: 200000. Narx 120000 bo‘lsa, naqd to‘lovda 120000 * 95 div 100 = 114000.
Sinfda faoliyat

«Test tuzuvchilar»: har bir juftlik 3 ta o‘ylab topilgan savol tuzadi; boshqa juftlik ilovada sinaydi va ikki xil javob to‘plami uchun ballni oldindan hisoblab tekshiradi.

Mashq
1
2+3*4 ning qiymati?
2
15 mod 4 nechaga teng?
3
Narx 150000, naqd to‘lov 5% chegirma bilan. Qancha to‘lanadi?
4
Nima uchun «mini-test» da to‘g‘ri javob raqamini oldin daftarga yozish kerak?