Наставник - сайт Открытых уроков. Учителя Казахстана. Образование в Казахстане
.
.
Компьютермен жұмыс -

Компьютермен жұмыс

Сабақ жоспары | Документы | Қосымша сабақ жоспары Загрузок: 0 | Просмотров: 1049 | Размер: | Автор: гость
. Компьютермен жұмыс

1-ден n – ге дейінгі сандардың квадраттарының қосындысын табатын программа құру керек.
Program kvadrat;
Var s, i , n: integer;
Begin
WriteLn (‘ n = ’) ;
Readln (n);
I:=1;
S:=0;
While i<=n do
Begin S:=S + sqr (i);
I:= i+1;
WriteLn (‘ S=’ , S);
End;
End.

Деңгейлік тапсырма
А. Осы программаны компьютерде теріп орындаңдар. (5ұп)
В. Осы программаны тақ сандардың қосындысын табатындай етіп өзгертіп, компьютерде орындаңдар. (10ұп)
С. Осы программаны тақ сандардың квадратының қосындысын табатындай етіп өзгертіп, қателерін тексеріп, түрлі мән беріп бірнеше рет орындаңдар, файлды өз фамилияларың мен есеп нөмірін файл аты етіп сақтаңдар. (15 ұп)

Мағынаны тану. Топтық жұмыс
ЖИГСО әдісі
Үш топқа бір есеп беріледі.
1 топ- берілген есептің блок-схемасын сызады, ережелерін айтып өтеді.
2 топ- программасын құрады.
3 топ – компьютерде орындайды
салысытырып, тексереді.

Енді мына есепке программа жазып көрелік.
Е С Е П: Бүтін М санына дейінгі жұп сандардың қосындысын табатын программа жазыңыз.
Мат.мод.
1. Не белгілі? М – бүтін, қайталау параметрі а- бүтін,
2. Не табу керек? Жұп сан қосындысы s – бүтін,
3. Қалай есептейміз;
М –мәнін енгіземіз, а:=2 қосынды s:=0
болады
а< m болса а=m болғанша қайталанады,
s:=s+а: а:=а+2;
қайталаймыз.

Программа мәтіні:
program м1;
var s,а,m:integer;
begin
s:=0; а:=2;
write('bytin san engiz ');
read(m);
while а<=m do
begin
s:=s+а; а:=а+1;
end;
write('summa s=',s);
end.
Скачать методички (классные уроки) для учителей по разным предметам: история, литература, физика. Как провести урок с учеником, вам поможет грамотно составленный план урока. Занятия по математике, литературе, физике, информатике, химии, психологии.
.