12 – dars. Dastur va dasturlash tillari Darsning texnologik xarita


MY Darslikdagi 1-2-3-mashqlar. Uyga vazifa



Yüklə 0,55 Mb.
səhifə48/65
tarix22.06.2022
ölçüsü0,55 Mb.
#62071
1   ...   44   45   46   47   48   49   50   51   ...   65
12 – dars. Dastur va dasturlash tillari Darsning texnologik xari

MY Darslikdagi 1-2-3-mashqlar.
Uyga vazifa:
1. Darslikdagi 4-mashq.
2. Test tuzish (5 ta va undan ortiq).
3*. Darslikdagi 5-mashq.
Ba’zi masalalarni yechimlari:
4. Dasturi:
Var A: array[1..17] of real; I: integer;
Begin
for I:=1 to 17 do begin write(‘a[’, I , ‘]=’); readln(a[I]); end; {massivni kiritish}
for I:=1 to 17 do if a[I]=0 then write( I, ‘ ‘ ); {massiv indeksini ajratib chiqarish}
End.
5. Yo’llanmadan foydalanib quyidagi dastur tuziladi:
Var I: integer; x, y : real;
Begin
For i:=0 to 40 do begin x:=i*0.25; y: = 2*x+19; writeln(‘x= ’, x:0:2 , ‘ y=’, y:0:2); end;
End.


34 – dars. Parametrli takrorlash operatori mavzusini takrorlash
Darsning blok-chizmasi: D jadval

O’tilganlarni takrorlash avvalgi mavzular materiallari va darslikning shu mavzusida berilgan vazifalar yordamida amalga oshiriladi.


Uyga vazifa:
1. Darslikdagi ishlanmay qolgan yoki qo’shimcha misollar.
2*. O’quvchi takrorlanishga oid masala tuzishi va yechishi.
Ba’zi masalalarni yechimlari:
3. Asosiy qismi: S:=0; for I:=1 to 25 do S:=S+2*I;
4. Asosiy qismi: S:=0; for I:=1 to 201 do S:=S+(10*I–4)/(10*I+1);
5. Asosiy qismi: P:=1; for I:=1 to 23 do if I mod 2 <>0 then P:=P*I;
6. Asosiy qismi: for I:=5 downto 1 do writeln(‘A[’, I , ‘]=’, A[I]);
7. Asosiy qismi: S:=0; for I:=1 to 15 do if I mod 2 = 0 then S:=S–A[I] else S:=S+A[I];
9. Asosiy qismi: for I:=1 to 100 do if A[I] mod 5 = 0 then writeln(‘A[’, I , ‘]=’, A[I]);


35 – dars. Shart bo‘yicha takrorlash operatorlari


Darsning texnologik xaritasi

Mavzu

Shart bo‘yicha takrorlash operatorlari


Yüklə 0,55 Mb.

Dostları ilə paylaş:
1   ...   44   45   46   47   48   49   50   51   ...   65




Verilənlər bazası müəlliflik hüququ ilə müdafiə olunur ©azkurs.org 2024
rəhbərliyinə müraciət

gir | qeydiyyatdan keç
    Ana səhifə


yükləyin