- Главная
- Разное
- Образование
- Спорт
- Естествознание
- Природоведение
- Религиоведение
- Французский язык
- Черчение
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, фоны, картинки для презентаций
- Экология
- Экономика
Презентация, доклад по информатике на тему Repeat операторы (9 класс)
Содержание
- 1. Презентация по информатике на тему Repeat операторы (9 класс)
- 2. Repeat операторы. Repeat қайталау операторы Whіle
- 3. Жазылу үлгісіRepeat ; <
- 4. Мысалы: у=3x+1, мұндағы х, -1 мен 2
- 5. Практикалық жұмыс
- 6. №1 ТАПСЫРМАn! мәнін есептеу керек.. Var r,n,k:integer;Begin Write('n='); Read(n); k:=1; r:=1;Repeat r:=r*k; k:=k+1;Until k>n;Write(r); End.
- 7. Слайд 7
- 8. №4 ТАПСЫРМА var x,y:real;beginx:=1;repeat y:=sqrt(x+1)-1/x;writeln('x=',x,', ', 'y=',y:5:2);x:=x+0.2;until x>3;end.
- 9. Үйге тапсырма: §7 оқу, (63-69 бет),Оқулықтан: Есептер жинағы: 1№13 практикалық жұмыс, қорытынды тест, 70 бет
Repeat операторы. Repeat қайталау операторы Whіle операторына ұқсас, айырмашылығы – қайталану шарты цикл соңында тексеріледі, сондықтан ол кем дегенде бір рет орындалатын болады. Екінші өзгешелігі - цикл тұлғасы шарт жалған болғанда қайталанып, ол ақиқат болған
Слайд 2
Repeat операторы. Repeat қайталау операторы Whіle операторына ұқсас, айырмашылығы –
қайталану шарты цикл соңында тексеріледі, сондықтан ол кем дегенде бір рет орындалатын болады. Екінші өзгешелігі - цикл тұлғасы шарт жалған болғанда қайталанып, ол ақиқат болған кезде циклді орындау доғарылады (Whіle операторында керісінше болған).
Слайд 4Мысалы: у=3x+1, мұндағы х, -1 мен 2 аралығындағы сандарды қабылдайды, қадамы
0,5 тең.
Var x,y:real;
Begin x:=-1;
Repeat y:=3*x+1;
writeln('y=', y);
x:=x+0.5;
until x >2
End.
Var x,y:real;
Begin x:=-1;
Repeat y:=3*x+1;
writeln('y=', y);
x:=x+0.5;
until x >2
End.
Слайд 6№1 ТАПСЫРМА
n! мәнін есептеу керек.
.
Var r,n,k:integer;
Begin
Write('n='); Read(n);
k:=1; r:=1;
Repeat
r:=r*k;
k:=k+1;
Until k>n;
Write(r); End.
Слайд 7
1-ден n-ге дейінгі сандардың квадраттарының қосындысын табатын программа құру керек.
Var s,i,n:integer;
Begin
Write('n=');
Read(n);
I:=1; S:=0;
Repeat s:=s+sqr(i);
Writeln('S=',S);
I:=i+1;
until i>n End.
№2 тапсырма
Слайд 8№4 ТАПСЫРМА
var x,y:real;
begin
x:=1;
repeat y:=sqrt(x+1)-1/x;
writeln('x=',x,', ', 'y=',y:5:2);
x:=x+0.2;
until x>3;
end.
Слайд 9Үйге тапсырма:
§7 оқу, (63-69 бет),
Оқулықтан:
Есептер жинағы:
1№13 практикалық жұмыс,
қорытынды тест,
70 бет
