Презентация по информатике на тему While операторы (9 класс)
БҮТІН ТИПКЕ ҚОЛДАНЫЛАТЫН АМАЛДАРДЫ ТАП. (ДҰРЫС ТАПСАҢ ШАР ӘУЕГЕ ҚАЛЫҚТАЙДЫ!) NOT SIN(X) AND MOD PRED(X) ORD(X) DIV OR ABS(X) СТАНДАРТТЫ ФУНКЦИЯЛАРДЫ ТАП. (ДҰРЫС ТАПСАҢ ШАР ӘУЕГЕ ҚАЛЫҚТАЙДЫ!) ABS(X) OR MOD DIV AND PRED(X) XOR SIN(X)
NOT FOR ОПЕРАТОРЫ ҚАНДАЙ АЛГОРИТМДЕРГЕ БАҒДАРЛАМА ҚҰРҒАН КЕЗДЕ ҚОЛДАНЫЛАДЫ? (ДҰРЫСЫ ТЫШҚАНМЕН ШЕРТКЕНДЕ ЖАСЫЛ ТҮСКЕ БОЯЛАДЫ) Арифметикалықцикл Сызықтық Тармақталған толымсыз Қадамдық цикл Тармақталғантолымды ЛОГИКАЛЫҚ ТИПКЕ ЖАТАТЫНАСҚАБАҚТАРДЫ ЖИНА! 12 -63254 -58,213 ‘?’ ‘girl’ ‘алма’ ‘#’ z>0 a
0 ‘A’ a Do Begіn < 1 оператор >;< 2 оператор >;...< n оператор >;End; Мысалы: у=3x+1, мұндағы х, -1 мен 2 аралығындағы сандарды қабылдайды, қадамы 0,5 тең. var x:real; y:real; begin x:=-1; while x<=2 Do begin y:=3*x+1; writeln('x=', x, ',','y=', y); x:=x+0.5; end; end. Whіle операторының орындалу тәртібі: Цикл қайталанар алдында, логикалық өрнектің мәні тексеріледі, егер True (ақиқат) болса, онда цикл денесі қайталанып орындалып отырады. Керісінше False (жалған) болса, циклдің орындалуы аяқталып, Whіle операторынан кейінгі жолдар орындалады.Егер, ең басында, өрнектің мәні False (жалған) болса, онда цикл бір ретте орындалмайды. Мысалы: 1 –ден 100-ге дейінгі сандардың қосындысын табу керек. Program kosindi;Var I,s : integer;Begіn s:=0;FOR i:=1 TO 100 DO S:=s+I; Wrіteln ( ‘s=‘,s); End. №1 ТАПСЫРМА n! мәнін есептеу керек. . uses crt;var r, n, k : integer;begin write (‘n=’, n); readln (n);k:=1; r:=1;while k<=n do begin r:=r*k; k:=k+1 end;write (n, ‘!=’,r)end.
1-ден n-ге дейінгі сандардың квадраттарының қосындысын табатын программа құру керек. Var s,i,n:integer; BeginWriteln(’n=’);Readln(n); I:=1; S:=0; While i<=n do Begin S:= S+sqr(i); I:=i+1; Writeln(‘S=’,S); End; End. №2 тапсырма №3 ТАПСЫРМА Z=Y3 функциясының мәнін есептеу керек, мұндағы Y=1,2,3,4,5,6,7. Программаның нәтижесінде Y-тің мәні мен сәйкес функцияның мәні кесте түрінде шығады. Y-тің өзгеру қадамы 1-ге тең. Var Z,Y: integer; Begin Z:=1;While y<=6 doBeginZ:=sqr(Y)*Y; Writeln ( ‘Y=’,Y,’___ Z=’,Z) ; Y :=Y+1 ; End; End. №4 ТАПСЫРМА var x,y:real;
begin
x:=1;
while x<=3 do
begin y:=sqrt(x+1)-1/x;
writeln('x=',x,', ', 'y=',y:5:2);
x:=x+0.2;
end; end.