Алгоритмді Паскаль тілінде программалау

Алгоритмді Паскаль тілінде

программалау.

1) Алгоритм дегеніміз не?

2) Алгоритмдік тілде қызмет

етуші сөздерді атаңыз

3) Қандай алгоритмдер сызықты

деп аталады ?

Паскаль тілінің алфавитін

не құрайды ?

5) Паскаль тілінің операторлары дегеніміз не ?

Символ

Аталуы

Символ

Аталуы

A-Z

бас әріптер

қос нүкте

a-z

кіші әріптер

;

нүктелі үтір

0-9, A-F

сандар

нүкте

қосу белгісі

үтір

азайту белгісі

апостроф белгісі

Көбейту белгісі

доллар белгісі

Бөлу белгісі

AND

логик көбейту

теңдік белгісі

логик қосу

үлкендік белгісі

NOT

емес

кішілік белгісі

DIV

бутун бөлу

үлкен немесе тең

MOD

қалдықты табу

кіші немесе тең

тең емес

Аталуы

Символ

Аталуы

A-Z

бас әріптер

қос нүкте

a-z

кіші әріптер

;

нүктелі үтір

0-9, A-F

сандар

нүкте

қосу белгісі

үтір

азайту белгісі

апостроф белгісі

Көбейту белгісі

доллар белгісі

Бөлу белгісі

AND

логик көбейту

теңдік белгісі

логик қосу

үлкендік белгісі

NOT

емес

кішілік белгісі

DIV

бутун бөлу

үлкен немесе тең

MOD

қалдықты табу

кіші немесе тең

тең емес

Оператор

Оқылуы

Атқаратын қызметі

Program

Програм

Программаға түсіндіру жасау үшін

Var

Вар

Аргументтерді көрсету

Begin

Бегин

Блоктің басталуы

Const

Константа

өзгермейтін сан

Write

Врайт

Нәтижені шығару

Real

Рейл

Read

Рид

Аргументті енгізу

Integer

Интежер

Бутун сан

end

инд

Программаның аяқталғанын білдіреді.

Оператор

Оқылуы

Атқаратын қызметі

Program

Програм

Программаға түсіндіру жасау үшін

Var

Вар

Аргументтерді көрсету

Begin

Бегин

Блоктің басталуы

Const

Константа

өзгермейтін сан

Write

Врайт

Нәтижені шығару

Real

Рейл

Read

Рид

Аргументті енгізу

Integer

Интежер

Бутун сан

end

инд

Программаның аяқталғанын білдіреді.

1. Өрнектерді Паскаль тілінде жазу.

1) А=

4) В=

2) А=

5) Z=

3) у=

6) sin2 x + cos2 x = 1

1-есеп. Герон формуласы бойынша үшбұрыштың ауданын есептеп шығаратын программа құрастырыңыз.

Program Geron;

Var a, b, c, p, S : real;

Begin

Read (a, b, c) ;

P:=(a+b+c) / 2 ;

S:=sqrt(p*(p-a) *(p-b) *(p-c) ) ;

Writeln(S) ;

End.

2-есеп. Табанының радиусы R болған шеңбердің ауданын есептеу программасын құрастырыңыз.

Program Shenber;

Var π, R, S : real;

Begin

Read (R) ;

π=3. 14 ;

S:=рі*sqr(R) ;

Writeln(S) ;

End.

3-есеп. «Сиқырлы есеп». Санау жүйесіне байланысты есеп.

Мен жастамын. Мектеп табалдырығын 111 жасымда аттадым. Мен А. Югнаки атындағы мектептің 1001 сыныбында оқимын. Біздің сыныпта барлығы 11001 оқушы. Менің арманым келешекте атақты компьютер маманы болу.

2 =1*23+1*22+1*21+1*20=1510

111=1*22+1*21+1*20=710

1001=1*23+0*22+0*21+1*20=910

11001=1*24+1*23+0*22+0*21+1*20=2510

Мен 15 жастамын. Мектеп табалдырығын 7 жасымда аттадым. Мен А. Югнаки атындағы мектептің 9 сыныбында оқимын. Біздің сыныпта барлығы 25 оқушы. Менің арманым келешекте атақты компьютер маманы болу.

4-есеп. «Құпия жәшік».

Бұл құралдың жасы 200-5000 жылдар шамасы. Бұл құралды гректер мен Батыс Еуропалықтар «абак» деп, қытайлықтар «суанпан» деп, жапондықтар «серобян» деп атаған.

Жәшіктің ішінде қандай құрал бар ?.

Жауапты Морзе алфавитінде жазу.