Инфоурок Информатика ПрезентацииПрезентация по информатике на тему "Turbo Paskalda mesele we mysallaryň çözülüşi" (9 synp)

презентация по информатике на тему "Turbo Paskalda mesele we mysallaryň çözülüşi" (9 synp)

Скачать материал
Скачать материал "Презентация по информатике на тему "Turbo Paskalda mesele we mysallaryň çözülüşi" (9 synp)"

Получите профессию

Технолог-калькулятор общественного питания

за 6 месяцев

Пройти курс

Рабочие листы
к вашим урокам

Скачать

Методические разработки к Вашему уроку:

Получите новую специальность за 3 месяца

Культуролог-аниматор

Описание презентации по отдельным слайдам:

  • 10-NJY 
ORTA
MEKDEP

    1 слайд

    10-NJY
    ORTA
    MEKDEP

  • Informatika9-njy synp

    2 слайд

    Informatika
    9-njy synp

  • Turbo  Paskalda mysallar we çözüliŞi

    3 слайд

    Turbo
    Paskalda
    mysallar
    we
    çözüliŞi

  • 1. Üçburçlugyň taraplarynyň a,b,c uzynlyklary berlen. Geronyň formulasyny ul...

    4 слайд

    1. Üçburçlugyň taraplarynyň a,b,c uzynlyklary berlen.
    Geronyň formulasyny ulanyp üçburçlugyň meýdanyny tapmaly.
    Çözülişi

  • Üçburçlugyň meýdanyny hasaplamak.
var
A:REAL;
B: REAL;
S:REAL;
BEGIN
WRITELN(...

    5 слайд

    Üçburçlugyň meýdanyny hasaplamak.
    var
    A:REAL;
    B: REAL;
    S:REAL;
    BEGIN
    WRITELN(' BAHASYNY GIRIZ A,B:');
    READ(A,B);
    S:=(A*B)/2;
    WRITELN;
    WRITE('UCHBURCHLUK MEIDANY=',S:7:2)
    END.

  •  2. Üçburçlugyň meýdanyny Geronyň formulasy boýunça hasaplamak.Çozülişi

    6 слайд

    2. Üçburçlugyň meýdanyny Geronyň formulasy boýunça hasaplamak.
    Çozülişi

  • var a,b,c,p,s: Real;beginwrite ('uchburch taraplaryny giriz');read(a,b,c)...

    7 слайд


    var a,b,c,p,s: Real;
    begin
    write ('uchburch taraplaryny giriz');
    read(a,b,c);
    p:=(a+b+c)/2;
    s:=SQRT(p*(p-a)*(p-b)*(p-c));
    write('Uchburch meidany=',s:8:2);
    end.

  •  3. Trapesiýanyň meýdanyny hasaplamak.Çözülişi

    8 слайд

    3. Trapesiýanyň meýdanyny hasaplamak.
    Çözülişi

  • var
BS:REAL;
AD: REAL;
H:REAL;
S:REAL;
BEGIN
WRITELN('BAHASYNY GIRIZ BS,AD,H:...

    9 слайд

    var
    BS:REAL;
    AD: REAL;
    H:REAL;
    S:REAL;
    BEGIN
    WRITELN('BAHASYNY GIRIZ BS,AD,H:');
    READ(BS,AD,H);
    S:=(BS+AD)*H/2;
    WRITELN;
    WRITE('TRAPESIA MEIDANY=',S:7:2)
    END.

  • 
 
 4. Şaryň göwrümini hasaplamak. Çözülişi

    10 слайд


     
    4. Şaryň göwrümini hasaplamak.
    Çözülişi

  • program shar;                
var  r: real;
v: real;
begin
r:=0.2;
v:=4*pi*r*...

    11 слайд

    program shar;
    var r: real;
    v: real;
    begin
    r:=0.2;
    v:=4*pi*r*r*r/3;
    writeln('Sar gowrumi=',v:8:3);
    end.

  • 5. Taraplary A we B bolan dörtburçlygyň perimetrini A=9, B=21 bolan ýagdaý ü...

    12 слайд


    5. Taraplary A we B bolan dörtburçlygyň perimetrini A=9, B=21 bolan ýagdaý üçin programma ýazmaly.

    Çözülişi

  • Program mysal;
var A,B,P : integer;          
BEGIN
A:=9;
 B:=21;
P:=(A+B)*2;...

    13 слайд

    Program mysal;
    var A,B,P : integer;
    BEGIN
    A:=9;
     B:=21;
    P:=(A+B)*2;
    WRITELN(P)
    END.


  • 6. Mysal. Bitin K san berlipdir. K sana gabat gelýän bahany beýan edýän sözi...

    14 слайд

    6. Mysal. Bitin K san berlipdir. K sana gabat gelýän bahany beýan edýän sözi çykarmaly
    (1-“ýaramaz”, 2-“kanagatlanarsyz”, 3-“kanagatlanarly”,4 –“ýagşy”, 5-“örän ýagşy”).
    Eger-de K san 1-5 aralykda ýatmaýan bolsa onda ýalňyş diýen ýazgyny ekrana çykarmaly.
    Çözülişi

  • Program Bahalar;
var k:integer;
begin
read (k);
case k of
1: writeln ('varama...

    15 слайд

    Program Bahalar;
    var k:integer;
    begin
    read (k);
    case k of
    1: writeln ('varamaz');
    2: writeln ('kanagatlanarsyz');
    3: writeln ('kanagatlanarly');
    4: writeln ('vagshy');
    5: writeln ('oran vagshy');
    else writeln ('k-nyng bahasy valngysh');
    end;
    end.

  • 7.  Mysal   1-12-nji aýlaryň nomerleri berilipdir(1-Ýanwar,2-Fewral,3-Mart, ....

    16 слайд

    7. Mysal 1-12-nji aýlaryň nomerleri berilipdir(1-Ýanwar,2-Fewral,3-Mart, ...,12-Dekabr). Bu aýyň ýylyň haýsy paslyna degişlidigini kesgitlemeli we çapa çykarmaly.
    Çözülişi

  • Program Pasyllar; var k:integer;
begin	
read (k);
case k of
1: writeln ('gysh...

    17 слайд

    Program Pasyllar; var k:integer;
    begin
    read (k);
    case k of
    1: writeln ('gysh');
    2: writeln ('gysh');
    3: writeln ('bahar');
    4: writeln ('bahar');
    5: writeln ('bahar');
    6: writeln ('ýaz');
    7: writeln ('ýaz');
    8: writeln ('ýaz');
    9: writeln ('güz');
    10: writeln ('güz');
    11: writeln ('güz');
    12: writeln ('gysh');
    else writeln ('k-nyng bahasy valngysh');
    end;
    end.

  • 8.   ax2 +bx+c=o Kwadrat deňlemäniň köklerini hasaplamagyň programmasyny düzm...

    18 слайд

    8. ax2 +bx+c=o Kwadrat deňlemäniň köklerini hasaplamagyň programmasyny düzmeli.

    Çözülişi

  • Çözülişi. D=b 2 -4ac; D>0, x1=(-b-sqrt(D)/(2a),  x1=(-b+sqrt(D)/(2a), D=0,
la...

    19 слайд

    Çözülişi. D=b 2 -4ac; D>0, x1=(-b-sqrt(D)/(2a), x1=(-b+sqrt(D)/(2a), D=0,
    label 1;
    var a,b,c,d,x,x1,x2:real;
    begin
    1:write('a,b,c-ny bahalaryny giriz');
    read (a,b,c);
    if a=0 then goto 1;
    d:=SQRT(b)-4*a*c;
    if d<0 then writeln ('D H K vok') else if d=0 then writeln ('x=',-b/(2*a)) else begin x1:=(-b-SQRT(D))/(2*A);
    X2:=(-b+SQRT(d))/(2*a);
    writeln('x1=',x1,'x2=',x2);
    end;
    end.

  • 8.1. Berlen üç a,b,c sanlardan iň kiçisini tapmak üçin programma ýazmaly.Çöz...

    20 слайд

    8.1. Berlen üç a,b,c sanlardan iň kiçisini tapmak üçin programma ýazmaly.
    Çözülişi

  • var
a,b,c,min:integer;
begin
Writeln(&#039;a,&#039;,&#039;b,&#039;,&#039;c-sanlary giriz&#039;);
read(a,b,c...

    21 слайд

    var
    a,b,c,min:integer;
    begin
    Writeln('a,','b,','c-sanlary giriz');
    read(a,b,c);
    if a<b
    then min:=a
    else min:=b;
    if c<min
    then min:=c;
    writeln('a=',a,' b=',b,' c=',c);
    writeln('ing kicgi san=',min);
    end.

  •  9. Kök almak programmasyny ýazmaly.Çözülişi

    22 слайд

    9. Kök almak programmasyny ýazmaly.
    Çözülişi

  • var
  x,y: real;
begin
   read(x);
   y:=SQRT(x);
   writeln(&#039;y=&#039;,y);
end.

    23 слайд

    var
    x,y: real;
    begin
    read(x);
    y:=SQRT(x);
    writeln('y=',y);
    end.

  • 10.     1+1/21+...+1/2k jemi hasaplamaly (hasaplamany 2k&gt;1000 bolýança dowam...

    24 слайд

    10. 1+1/21+...+1/2k jemi hasaplamaly (hasaplamany 2k>1000 bolýança dowam etmeli).

    Çözülişi

  • Program Jem2;
i:integer; s:real;
begin
s:=0; i:=1;
Repeat
 s:=s+1/i;
i:=i*2;...

    25 слайд

    Program Jem2;
    i:integer; s:real;
    begin
    s:=0; i:=1;
    Repeat
     s:=s+1/i;
    i:=i*2;
    until i>1000;
    writeln('s=',s:9:4);
    end.


    Çykmak

Получите профессию

Фитнес-тренер

за 6 месяцев

Пройти курс

Рабочие листы
к вашим урокам

Скачать

Краткое описание документа:

Informatika 9-njy synp Turbo Paskalda mesele we mysallaryň çözülüşi. 1. Üçburçlugyň taraplarynyň a,b,c uzynlyklary berlen. Geronyň formulasyny ulanyp üçburçlugyň meýdanyny tapmaly. Üçburçlugyň meýdanyny hasaplamak. var A:REAL; B: REAL; S:REAL; BEGIN WRITELN(' BAHASYNY GIRIZ A,B:'); READ(A,B); S:=(A*B)/2; WRITELN; WRITE('UCHBURCHLUK MEIDANY=',S:7:2) END. 2. Üçburçlugyň meýdanyny Geronyň formulasy boýunça hasaplamak. var a,b,c,p,s: Real; begin write ('uchburch taraplaryny giriz'); read(a,b,c); p:=(a+b+c)/2; s:=SQRT(p*(p-a)*(p-b)*(p-c)); write('Uchburch meidany=',s:8:2); end. 3. Trapesiýanyň meýdanyny hasaplamak. var BS:REAL; AD: REAL; H:REAL; S:REAL; BEGIN WRITELN('BAHASYNY GIRIZ BS,AD,H:'); READ(BS,AD,H); S:=(BS+AD)*H/2; WRITELN; WRITE('TRAPESIA MEIDANY=',S:7:2) END.

Скачать материал

Найдите материал к любому уроку, указав свой предмет (категорию), класс, учебник и тему:

6 624 754 материала в базе

Скачать материал

Оставьте свой комментарий

Авторизуйтесь, чтобы задавать вопросы.

  • Скачать материал
    • 14.05.2015 2290
    • PPTX 155.6 кбайт
    • Оцените материал:
  • Настоящий материал опубликован пользователем Ниязметов Султанмурат Ниязметович. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт

    Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.

    Удалить материал
  • Автор материала

    • На сайте: 9 лет и 2 месяца
    • Подписчики: 0
    • Всего просмотров: 107783
    • Всего материалов: 91

Ваша скидка на курсы

40%
Скидка для нового слушателя. Войдите на сайт, чтобы применить скидку к любому курсу
Курсы со скидкой

Курс профессиональной переподготовки

Бухгалтер

Бухгалтер

500/1000 ч.

Подать заявку О курсе

Курс профессиональной переподготовки

Математика и информатика: теория и методика преподавания в профессиональном образовании

Преподаватель математики и информатики

500/1000 ч.

от 8900 руб. от 4450 руб.
Подать заявку О курсе
  • Сейчас обучается 44 человека из 22 регионов

Курс повышения квалификации

Методика преподавания информатики в начальных классах

72 ч. — 180 ч.

от 2200 руб. от 1100 руб.
Подать заявку О курсе

Курс профессиональной переподготовки

Информационные технологии в профессиональной деятельности: теория и методика преподавания в образовательной организации

Преподаватель информационных технологий

300/600 ч.

от 7900 руб. от 3950 руб.
Подать заявку О курсе
  • Сейчас обучается 188 человек из 53 регионов

Мини-курс

Коррекция нарушений у детей: сна, питания и приучения к туалету

6 ч.

780 руб. 390 руб.
Подать заявку О курсе

Мини-курс

Психология детства и подросткового возраста

3 ч.

780 руб. 390 руб.
Подать заявку О курсе
  • Сейчас обучается 61 человек из 37 регионов

Мини-курс

Цифровая трансформация в бизнесе: аспекты управления и развития

3 ч.

780 руб. 390 руб.
Подать заявку О курсе