Sońǵy jańartý

(Ózgertilgen ýaqyty 2 kún buryn)
Paskal esepterin shyǵarý joldaryn úıretý
Informatıka 9 synyp
Sabaqtyń taqyryby: Esepter sheshý boıynsha praktıkým
Sabaqtyń maqsaty: Oqýshylarǵa Paskal esepterin shyǵarý joldaryn úıretý;
Bilimdiligi: Tıpterdiń Paskal tilinde jazylý túrleri týraly uǵymdaryn damytý;
Damytýshylyǵy: Oqýshylardy programmalaý tiliniń komandalarymen jáne qurylymmen tanystyra otyryp, logıkalyq oı - óristerin damytý; Qorshaǵan ortanyń ortaq qasıetteri men jeke qasıetterin aıyra bilýge tárbıeleý.
Tárbıelik: Oqýshylardy uqyptylyqqa, jınaqylyqqa adamgershilikke tárbıeleý.
Sabaqtyń túri: Bilim bilikti qalyptastyrý sabaǵy

Sabaqtyń barysy:
1. Uıymdastyrý
2. Úı tapsyrmasyn tekserý
3. Esepter shyǵarý
4. Úıge tapsyrma

İİ. Úıge berilgen esepterdi tekserý
İİİ. Esepter shyǵarý:
3 KE BÓLİNSE SANDARDY QOS, 3 KE BÓLİNBESE AZAIT
program esep; var n, m: integer; x: real; begin write('n='); read(n);
write('m='); read(m); if (n mod 3=0) and (n mod 3=0) then x:=n+m else x:=n - m;
{if a=m/3 then a:=n+m else a:=n - m;}
write('x=', x: 6: 2); end.
MAKSIMÝMDY TABÝ
program esep2; var a, b, c, max: integer;
begin read(a, b, c); if a>b then max:=a else if b>c
then max:=b else if a>c then max:=a else max:=c;
write('max=', max); end.
Paskal esepterin shyǵarý joldaryn úıretý júkteý

You Might Also Like

Jańalyqtar

Jarnama