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
|
|
Dostları ilə paylaş: |