- Главная
- Разное
- Образование
- Спорт
- Естествознание
- Природоведение
- Религиоведение
- Французский язык
- Черчение
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, фоны, картинки для презентаций
- Экология
- Экономика
Презентация, доклад по информатике 9 класс
Содержание
- 1. Презентация по информатике 9 класс
- 2. IF
- 3. асb1) a = 4cm, b =
- 4. Program Perimetr;Var a,b,c,P:integer;BeginReadln(a,b,c);P:=a+b+c;Writeln(P);End.Program Audan;Var a,b,S:integer;BeginReadln(a,b);S:=ab/2;Writeln(S);End.Program gipotenusa;Var a,b,c:integer;BeginReadln(a,b);c:=sqrt(sqr(a)+sqr(b));Writeln(c);End.
- 5. Екі санның үлкенін табу.Апта күнін анықтау. 1
- 6. Program max;Var a,b,max:integer;BeginReadln(a,b);if a>b then max:=a else
- 7. Program Apta;Var i,n,S:integer;BeginReadln (n); S:=0; Beginfor i:=1
- 8. Венн диаграммасыАлгоритм. Паскаль тілі
IF ОндаTHEN ТаңдауELSE
Слайд 3а
с
b
1) a = 4cm, b = 3cm, c = 5cm
P - ?
2) a = 4cm, b = 3cm,
S - ?
3) a = 4cm, b = 3cm,
c - ?
2) a = 4cm, b = 3cm,
S - ?
3) a = 4cm, b = 3cm,
c - ?
«Алгоритм» оқыта үйрету.
Слайд 4Program Perimetr;
Var a,b,c,P:integer;
Begin
Readln(a,b,c);
P:=a+b+c;
Writeln(P);
End.
Program Audan;
Var a,b,S:integer;
Begin
Readln(a,b);
S:=ab/2;
Writeln(S);
End.
Program gipotenusa;
Var a,b,c:integer;
Begin
Readln(a,b);
c:=sqrt(sqr(a)+sqr(b));
Writeln(c);
End.
Слайд 5Екі санның үлкенін табу.
Апта күнін анықтау.
1 – ден 100 –
ге дейінгі сандар қосындысын табу.
Деңгейлік тапсырмалар.
Слайд 6Program max;
Var a,b,max:integer;
Begin
Readln(a,b);
if a>b then max:=a else max:=b;
Writeln (max);
End.
Program kosu;
Var i,n,S:integer;
Begin
Readln
(n);
S:=0;For i:=1 to n do
Begin
S:=s+I;End;
Writeln (S);
End.
S:=0;For i:=1 to n do
Begin
S:=s+I;End;
Writeln (S);
End.
Program Apta;
Var n:integer;
Begin
Readln (n);
Case n of
1:write(‘mondey’);
2:write(‘tuersdey’);
3:write(‘yensedey’);
4:write(‘fridey’);
5:write(‘saturdey’);
6:write(‘sandey’);
else
End.
Слайд 7Program Apta;
Var i,n,S:integer;
Begin
Readln (n);
S:=0;
Begin
for i:=1 to n do
S:=s+exp(i*ln(2));
End;
S:=s+1;
Writeln (S);
End.
Әрбір
бактерия бір минутта екіге бөлінеді. Басында бір бактерия берілген деп, 5минтта неше бактерия пайда болатынын тап.
Жаңа бактериялар да минут сайын көбейіп отырады.
Жаңа бактериялар да минут сайын көбейіп отырады.
