1- dars. Mavzu: Masalalarni kompyuterda yechish bosqichlari

Yangi mavzuni mustaxkamlash.
Mashqlar
Hafta kunlarining nomlarini kiritib, ularni «HAFTA.TXT» faylida saqlab qo'yadigan dastur tuzing.
Program misol_1;
Uses crt;
var kun : String; f : Text; I: integer;
Begin clrscr
Assign(f, 'hafta.txt'); Resete(f);
For i:=1 to 7 do begin WriteLn(I,’-kun nomini kiriting=’); readln(kun);
Writeln(f,kun); end;
Close(f); readln;
End.

2. 1-mashqdagi «HAFTA.TXT» faylini ochib, davomidan hafta kunlarining rus tilidagi nomlarini yozuvchi dastur tuzing.

3. «HAFTA.TXT» faylida berilgan hafta kunlarining nomlarini ekranga chiqaruvchi dastur tuzing.

Program misol_1;

Uses crt;
var hafta:array[1..7]of string; f : Text; s: string ; I: integer;
Begin clrscr
Assign(f, 'hafta.txt'); Reset(f);
For i:=1 to 7 do begin
Readln(f,s); Writeln(s); end;
Close(f); readln;
End.


Uyga vazifa: 2- mashqni dasturini tuzish.
Sana :______________
Sinf :_______________


45- dars. Mavzu: Fayllar bilan ishlash mavzusini takrorlash

Darsning texnologik xaritasi

Mavzu	Fayllar bilan ishlash mavzusini takrorlash
Maqsad va vazifalar	Darsning maqsadi: O'quvchilarga tashqi xotiradagi matnli fayllar bilan ishlash haqida ma’lumot berish. Darsning ta'limiy vazifasi: o'quvchilarga Paskal dasturlashtilining fayllar bilan ishlash imkoniyatlari va ularni qo’llash bo’yicha bilim berish va ko'nikma hosil qilish.