Chiziqli dasturlar tuzish taqdimot

9-dekabr kompyuter sichqonchasining tug'ilgan kuni hisoblanadi. 1968-yilning aynan shu kuni Stenford tadqiqot instituti xodimi Duglas Engelbart sichqonchani San-Fransiskodagi hisoblash texnikasi bo'yicha anjumanda taqdim qilgan. 11.12.2017 Mavzu: Chiziqli dasturlar tuzish Chiziqli dastur deb chiziqli algoritmning dastur shaklida yozilishiga aytiladi. Program aylanayuzi; Var r,S:Real; Begin Write('Radiusni kiriting:'); ReadLn(r); S:= pi*sqr(r); WriteLn('S=',S); End Boshlanish R ni qiymati kiriting S:=3,14*R*R Tamom S ning qiymati chiqarilsin 1. Radiusi R ga teng bo'lgan aylananing yuzini topish dasturini tuzing. Program o'rtageometrik; Var a,b,G:Integer; Begin Write('a ni kiriting:'); ReadLn(a); Write('b ni kiriting:'); ReadLn(b); G:= sqrt(a*b); WriteLn('G=',G); End. Boshlanish a va b ni qiymati kiriting Tamom G ning qiymati chiqarilsin 2. a va b sonlarning o'rta geometrigini topish dasturini tuzing Program yuza; Var a,b,S:Integer; Begin Write('a ni kiriting:'); ReadLn(a); Write('b ni kiriting:'); ReadLn(b); S:= a*b; WriteLn('S=',S); End. Boshlanish a va b ni qiymati kiriting S:=a*b Tamom S ning qiymati chiqarilsin 3. Tomonlari a va b bo'lgan to'g'ri to'rtburchakning yuzini topish dasturini tuzing. Program yuza; Var r,b,S:Integer; Begin Write('r ni kiriting:'); ReadLn(r); Write('b ni kiriting:'); ReadLn(b); S:= (2*r*b)-(pi*sqr(r))2; WriteLn('S=',S); End. Boshlanish r va b ni qiymati kiriting S:=(2r*b)-((3,14*r*r)2) Tamom S ning qiymati chiqarilsin 4. Shtrixlangan sohani yuzini toping a va b sonlarning o'rta arifmetigini topish dasturini tuzing Program o'rtaarifmetik; Var a,b,UA:Integer; Begin Write('a ni kiriting:'); ReadLn(a); Write('b ni kiriting:'); ReadLn(b); UA:= (a+b)2; WriteLn('UA=',UA); End. Boshlanish a va b ni qiymati kiriting UA:=(a+b)2 Tamom UA ning qiymati chiqarilsin a va b sonlarning o'rta arifmetrigini topish dasturini tuzing ...