Презентация, доклад СИМВОЛДЫҚ ШАМАЛАР 9 СЫНЫП

тәсілдермен бейнелеуге болады?
Блок-схема дегеніміз не?
Меншіктеу командасының құрылымы қандай және ол қалай жазылады?
Паскаль тіліндегі программаның негізгі құрылымы қандай?

Алгоритм дегеніміз нәтижеге жету мақсатында әрекеттердің рет-ретімен орындалу тізбегі.
Алгоритм қасиеттері: Түсініктілік,дискерттілік,анықтылық,нәтижелік,жалпылық
Алгоритмді сөздік,кестелі,графикалық,программалық тәсілдермен бейнелейміз
Блок схема деп алгоритмнің графикалық түрде жазылуы
:=
program esep;
cипаттау бөлімі
begin
операторлар бөлімі
end.

мәлімет енгізуді күтеді.
Readln-мәліметті жаңа жолдан бастап оқиды.
Write- апострафпен қоршаған мәтіндер немесе айнымалы болады.
Writeln- -мәліметті жаңа жолдан бастап оқиды.

мәндер енгізіледі делік:
212.5    38    ‘п’

Мысалы:
VAR
        A, B: REAL;
   BEGIN
        READ (A,B);
                 …
   END.

A, B айнымалылары үшін 4 5  Enter орындалса, онда машина оларды
А = 4.0, B = 5.0
түрінде қабылдайды.

= ’, B);
экранда   
В мәні = 1.715E+01

b = 56 мәні үшін WRITE (b :5) операторы экранға     
  «   56»

WRITE(123.456:10:4);

WRITE(123.456:6:2);

WRITE (Y : m: n)Мұндағы m – нәтижеге берілген барлық орын, n – үтірден соңғы бөлшек бөлігіне берілетін орындар саны.
Мысалы, C = -145.7865 болғанда
WRITE(C:8:3)
операторы экранға -145.786 мәнін шығарады, мұндағы жалпы орындар саны – 8, ал бөлшек 3 санмен бейнеленетіндіктен соңғы бір цифр жазылмай қалып отыр.

   WRITE (‘Y =’, Y:8:3) Y = 1.76 болса, экраннан
Y = 1.760  

writeln(‘Менің бірінші программа жазуым’);
readln;
end.

Екі сан қосындысын табу программасы.
Program мысал2;
Var A,B,S: Integer;
Begin
Writeln(‘ А, В мәндерін енгізу’);
Read (A,B);
S:=A+B;
Writeln(‘S=‘, S);
Readln (S);
End.

B1;
const pi=3.14159;
var
      R:real;
      L:real;
begin
         writeln(‘R мәнін енгізіңдер:’);
         read (R);
        L:=2*pi*R;
        writeln(‘нәтиже:’);
        writeln(‘шеңбер ұзындығы L =’, L:8:3);
end.
Экранда төмендегідей нәтиже көрінеді:
 R мәнін енгізіңдер:
0.2
нәтиже:
шеңбер ұзындығы L =1.257

R = 450,08

WRITE(‘3*2=‘) – шығады
WRITE(‘12*2=‘, 12*2) – шығады
WRITE(‘Менің Отаным - Қазақстан’) - шығады:
WRITE(6div2+5mod2) –
WRITE(7/3:3:1) –

readln(v, t);
s:=v*t;
Writeln (‘s=‘,s);
End;

3.

Program k;
Var x,y:integer; z: real;
Begin
z:=(sin(x)-y)/(abs(y)+cos(y));
Writeln(‘z=‘,z);

End.

2.

Program p1;
Var A,B,X:Real;
Begin
Readln(A,B);
X:=Sqr(A)+Sqr(b);
Writeln(‘Қосынды=‘,X:2:4);
End.

1.

Автомобильдің жүрген жолын табу

Екі нақты санның квадраттарының қосу программа
сы

Өрнектің мәнін есептеу

Жауаптары
Есептері

Р/с

Трапецияның ауданын табу

4 тапсырма.

программасын құр. Program шеңбер; Const PI=3.14159; Var L: Real ; R Integer; Begin Writeln(‘R-ді енгіз’) Readln (R); L=2*Pi*R Writeln(‘L=‘,L:4:2); End.

Дұрыс жауабы: Program шеңбер; Const PI=3.14159; Var L: Real ; R: Integer; Begin Writeln(‘R-ді енгіз’); Read (R); L:=2*Pi*R; Writeln(‘L=‘,L:4:2); End.

/(a*b*sqr(sin(x))*sin(x))

есептейтін программа жазыңыз.
 

Сабақ аяқталды, сау болыңыздар!