Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
19
Добавлен:
23.06.2014
Размер:
7.11 Кб
Скачать
‚ аЁ ­в 9.

1)‘®бв ўм⥠®вўҐвл Ї® Є®­ва®«м­л¬ ў®Їа®б ¬, § ¤ ­­л¬ ў ¬Ґв®¤ЁзҐбЄЁе гЄ § ­Ёпе.

1. Љ Є®Ј® вЁЇ  ЇҐаҐ¬Ґ­­л¬ ¬¦­® ЇаЁбў Ёў вм §­ зҐ­Ёп ЇҐаҐ¬Ґ­­ле ¤агЈ®Ј® вЁЇ .
ЋвўҐв: ЇҐаҐ¬Ґ­­л¬ ўҐйҐб⢥­­®Ј® вЁЇ  ¬®¦­® ЇаЁбў Ёў вм §­ зҐ­Ёп ЇҐаҐ¬Ґ­­ле 楫®зЁб«Ґ­­®Ј® вЁЇ ;
бва®Є®ў®¬г вЁЇг - бЁ¬ў®«м­л© вЁЇ;

2.Љ ЄЁҐ вЁЇл ў п§лЄҐ PASCAL ®в­®бпвбп Є Ї®ап¤Є®ўл¬ вЁЇ ¬?
ЋвўҐв: –Ґ«®зЁб«Ґ­­л©, бЁ¬ў®«м­л©, «®ЈЁзҐбЄЁ© Ё ®Ја ­ЁзҐ­­л© вЁЇл.

3.—Ґ¬ ®в«Ёз Ґвбп бЁ¬ў®«м­л© вЁЇ ®в бва®Є®ў®Ј® вЁЇ ?
ЋвўҐв: бЁ¬ў®«м­л© вЁЇ - нв® ¬­®¦Ґбвў® §­ зҐ­Ё© Є®¤®ў®© в Ў«Ёжл Є®¬ЇмовҐа ,   бва®Є®ўл© - нв® Ї®б«Ґ¤®ў вҐ«м­®бвм бЁ¬ў®«®ў Є®¤®ў®© в Ў«Ёжл Є®¬ЇмовҐа .
ЏҐаҐ¬Ґ­­ п(Ё«Ё Є®­бв ­в ) бЁ¬ў®«м­®Ј® вЁЇ  ¬®¦Ґв ᮤҐа¦ вм ўбҐЈ® ®¤­® Ё§ §­ зҐ­Ё© Є®¤®ў®© в Ў«Ёжл,   ЇҐаҐ¬Ґ­­ п (Ё«Ё Є®­бв ­в ) бва®Є®ў®Ј® вЁЇ  ¬®¦Ґв ᮤҐа¦ вм ®в 0 ¤® 255(Ї® 㬮«з ­Ёо) §­ зҐ­Ё© Є®¤®ў®© в Ў«Ёжл.

4.Ќ §ў вм ¤Ё Ї §®­л ¤®ЇгбвЁ¬ле §­ зҐ­Ё© ¤«п 楫ле Ё ўҐйҐб⢥­­ле вЁЇ®ў ¤ ­­ле.
–Ґ«л© вЁЇ ¤ ­­ле ¬®¦Ґв Ё¬Ґвм ¬ ЄбЁ¬ «м­л© ¤Ё Ї §®­ ¤®ЇгбвЁ¬ле §­ зҐ­Ё© [-2147483648..+2147483647] (longint).
‚ҐйҐб⢥­­л© вЁЇ ¬®¦Ґв Ё¬Ґвм ¬ Єб. ¤Ё Ї. ¤®Ї. §­ з. [9.2E-18..9.2E18] (comp).

5.Љ ЄЁҐ ®ЇҐа в®ал ¬®¦­® ЁбЇ®«м§®ў вм б «®ЈЁзҐбЄЁ¬(Boolean) вЁЇ®¬,Є ЄЁҐ ®ЇҐа в®ал ў®§ўа й ов §­ зҐ­ЁҐ «®ЈЁзҐбЄ®Ј® вЁЇ ?
­Ґ ¬®Јг в®з­® ®вўҐвЁвм, ­® ў®®ЎйҐ ўла ¦Ґ­Ёп Ё ЇҐаҐ¬Ґ­­лҐ Boolean вЁЇ  ЁбЇ®«м§говбп б Є®­бвагЄжЁҐ© IF..Then..else

6.Љ Є ®Ўкпў«повбп ЇҐаҐзЁб«Ё¬лҐ вЁЇл ¤ ­­ле?
Ћ’‚…’: ­ ЇаЁ¬Ґа:
const
min=0;
max=255;
TYPE
color=min..max;
var
c1,c2:color;

7.Љ Є®Ґ ¬ ЄбЁ¬ «м­®Ґ зЁб«® н«Ґ¬Ґ­в®ў ЇҐаҐзЁб«Ё¬®Ј® вЁЇ ?
ЋвўҐв: 256

8.ЏаЁўҐбвЁ ЇаЁ¬Ґа ®Ја ­ЁзҐ­­®Ј® вЁЇ  ¤ ­­ле.
Ћ’‚…’:
Type
color(red,green,blue);
var
c1:color;

9.Њ®¦­® «Ё ў Є зҐб⢥ н«Ґ¬Ґ­в®ў ®Ја ­ЁзҐ­­®Ј® вЁЇ  ЁбЇ®«м§®ў вм ўҐйҐб⢥­­лҐ зЁб« ?
ЋвўҐв: ­Ґ«м§п!

10.Љ Є®ў  ¬ ЄбЁ¬ «м­® ў®§¬®¦­ п ¤«Ё­  бва®ЄЁ Ё Є Є®ў  ¤«Ё­  бва®ЄЁ Ї® 㬮«з ­Ёо?
ЋвўҐв: ¬ ЄбЁ¬ «м­® ў®§¬®¦­ п - 255, Ї® 㬮«з ­Ёо - 255

11.Љ Є®ў Ї®а冷Є ўлЇ®«­Ґ­Ёп  аЁд¬ҐвЁзҐбЄЁе ®ЇҐа жЁ©?
ЋвўҐв: в Є®© ¦Ґ Є Є ў ¬ вҐ¬ вЁЄҐ: ЇаЁ®аЁвҐв®¬ Ї®«м§говбп ®ЇҐа жЁЁ г¬­®¦Ґ­Ёп Ё ¤Ґ«Ґ­Ёп

12.Љ Є®ў Ї®а冷Є ўлЇ®«­Ґ­Ёп «®ЈЁзҐбЄЁе ®ЇҐа жЁ©?
Ћ’‚…’:б­ з «  ўлЇ®«­пҐвбп NOT, § вҐ¬ AND, Ё в®«мЄ® Ї®б«Ґ нв®Ј® OR Ё«Ё XOR

13.Љ Є®© вЁЇ ®ЇҐа ­¤®ў г ®ЇҐа жЁ© ®в­®иҐ­Ёп Ё г «®ЈЁзҐбЄЁе ®ЇҐа жЁ©?
ЋвўҐв: boolean

14.Љ Є®Ј® вЁЇ  ЇҐаҐ¬Ґ­­лҐ Z Ё Y ў Їа®Ја ¬¬Ґ, ᮤҐа¦ йҐ© бва®Єг:
IF Z Then y:=A=B Ё зв® Ўг¤Ґв ў १г«мв вҐ ўлЇ®«­Ґ­Ёп нв®© бва®ЄЁ Їа®Ја ¬¬л?
Ћ’‚…’: ЇҐаҐ¬Ґ­­лҐ «®ЈЁзҐбЄ®Ј®(Boolean) вЁЇ . …б«Ё гб«®ўЁҐ Z ЁбвЁ­­®, в®Ј¤  y=FALSE

15.ЏҐаҐ¬Ґ­­лҐ Є Є®Ј® вЁЇ  ¬®¦­® ЁбЇ®«м§®ў вм ў Є зҐб⢥ Ї а ¬Ґва®ў жЁЄ«  FOR.TO..DO?
Ћ’‚…’:楫®зЁб«Ґ­­®Ј®

16.‚ 祬 ®в«ЁзЁҐ жЁЄ«®ў While..Do Ё Repeat..Until?
Ћ’‚…’:–ЁЄ« while ўлЇ®«­пҐвбп Ї®Є  гб«®ўЁҐ ЁбвЁ­­®,   жЁЄ« Repeat ўлЇ®«­пҐвбп Ї®Є  гб«®ўЁҐ ­Ґ бв ­Ґв ЁбвЁ­­л¬.

17.‚ Є ЄЁе ®ЇҐа в®а е жЁЄ«  ¤®ЇгбЄ Ґвбп Ё§¬Ґ­пвм Ї а ¬Ґва жЁЄ« ,   ў Є ЄЁе ­Ґв?
Ћ’‚…’: ¬®¦­® Ё§¬Ґ­пвм ў while..do Ё Repeat..until,   ­Ґ«м§п ў жЁЄ«Ґ For..to..do

18.ЋЇаҐ¤Ґ«Ґ­ЁҐ ¬ ббЁў .
Ћ’‚…’: Њ ббЁў - нв® бвагЄвгаЁа®ў ­­л© вЁЇ ¤ ­­ле, б®бв®пйЁ© Ё§ дЁЄбЁа®ў ­­®Ј® зЁб«  н«Ґ¬Ґ­в®ў ®¤­®Ј® вЁЇ  Ё ®Ў®§­ зҐ­­ле ®ЎйЁ¬ Ё¤Ґ­вЁдЁЄ в®а®¬.

19.ЏҐаҐ¬Ґ­­лҐ Є Є®Ј® вЁЇ  ¬®¦­® ЁбЇ®«м§®ў вм ў Є зҐб⢥ Ё­¤ҐЄб®ў ¬ ббЁў®ў?
Ћ’‚…’: 楫®зЁб«Ґ­­®Ј® (ЇҐаҐзЁб«пҐ¬®Ј®)

20.Љ ЄЁҐ ®ЎкҐЄвл(ЇҐаҐ¬Ґ­­лҐ,ўла ¦Ґ­Ёп Ё в.¤.) ¬®¦­® ЁбЇ®«м§®ў вм ў Є зҐб⢥ Ё­¤ҐЄб®ў ¬ ббЁў®ў?
Ћ’‚…’: ¬®¦­® ЁбЇ®«м§®ў вм ­ҐЇ®б।б⢥­­® §­ зҐ­Ёп, Є®­бв ­вл, ЇҐаҐ¬Ґ­­лҐ, ўла ¦Ґ­Ёп, дг­ЄжЁЁ –…‹Ћ—€‘‹…ЌЌЋѓЋ! ’€ЏЂ

21 Љ Є®ў  бвагЄвга  Їа®Ја ¬¬л?
Ћ’‚…’: Program <Ё¬п Їа®Ја ¬¬л>;
const {®ЇЁб ­ЁҐ Є®­бв ­в}
Type {®ЇЁб ­ЁҐ Ї®«м§®ў вҐ«мбЄЁе вЁЇ®ў}
var{®ЇЁб ­ЁҐ ЇҐаҐ¬Ґ­­ле}
begin
{⥫® Їа®Ја ¬¬л}
end.
’ Є¦Ґ ¬®Јгв Ўлвм а §¤Ґ«л Function Ё Procedure.

22.„«п 祣® ЁбЇ®«м§гҐвбп б®бв ў­®© ®ЇҐа в®а?
Ћ’‚…’: Ћ­ Ї®§ў®«пҐв ®ЎкҐ¤Ё­Ёвм ­ҐбЄ®«мЄ® ®ЇҐа в®а®ў Ё ўла ¦Ґ­Ё© ў Ґ¤Ё­®Ґ 楫®Ґ. — йҐ ўбҐЈ® ЁбЇ®«м§гҐвбп б ®ЇҐа в®а ¬Ё if..then, ў жЁЄ« е Ё в.¤.

23.„«п 祣® ЁбЇ®«м§говбп ®ЇҐа в®ал жЁЄ«  Ё «®ЈЁзҐбЄЁ©(гб«®ў­л©) ®ЇҐа в®а?
Ћ’‚…’: «®ЈЁзҐбЄЁ© ®ЇҐа в®а ў § ўЁбЁ¬®бвЁ ®в Ї®бв ў«Ґ­­®Ј® гб«®ўЁп ўлЇ®«­пҐв ⥠Ё«Ё Ё­лҐ ¤Ґ©бвўЁп. ЋЇҐа в®ал жЁЄ«  ­Ґ®Ўе®¤Ё¬л ¤«п ¬­®Ј®Єа в­®Ј® Ї®ўв®аҐ­Ёп (ўлЇ®«­Ґ­Ёп) ®¤­Ёе Ё вҐе ¦Ґ ¤Ґ©бвўЁ©(®ЇҐа в®а®ў, ўла ¦Ґ­Ё© Ё в.Ї.).




2)ЏҐаҐўҐбвЁ зЁб«  234 Ё 2048 ў ¤ў®Ёз­л© Ё иҐбв­ ¤ж вҐаЁз­л© ўЁ¤.
234 = 11101010 (¤ў®Ёз­л©) = EA (иҐбв­.)
2048 = 100000000000 (¤ў®Ёз­л©) = 800 (иҐбв­.)

3)‘®бв ўЁвм Їа®Ја ¬¬г, ў Є®в®а®© б Ї®¬®ймо ®ЇҐа в®а  While Ї®¤бзЁв вм б㬬г ап¤  ¤® вҐе Ї®а, Ї®Є  з«Ґ­ ап¤  ­Ґ Ўг¤Ґв ¬Ґ­миҐ 0.005.

program pr3;
var
s,h:real; {б㬬  ап¤ , з«Ґ­ ап¤ }
i:integer; {Ё­¤ҐЄб}
begin
s:=0; {§ ¤ Ґ¬ ­ з «м­лҐ §­ зҐ­Ёп ЇҐаҐ¬Ґ­­ле}
i:=3;
h:=(i+5)/(sqr(i)+10);
while h>0.005 do {­ з «® жЁЄ«  }
begin {ЁбЇ®«м§гҐ¬ б®бв ў­®© ®ЇҐа в®а}
h:=(i+5)/(sqr(i)+10); {ўлзЁб«Ґ­ЁҐ ⥪г饣® з«Ґ­  ап¤ }
s:=s+h; {Ї®¤бзҐв б㬬л ап¤ }
i:=i+1; {㢥«ЁзҐ­ЁҐ Ё­¤ҐЄб  ­  1 }
end; {Є®­Ґж б®бв ў­®Ј® ®ЇҐа в®а }
Writeln('‘㬬  ап¤  а ў­ : ',s:13:11); {д®а¬ вЁа®ў ­­л© ўлў®¤ б㬬л ап¤  ­  нЄа ­}
end.

4)‘®бв ўЁвм Їа®Ја ¬¬г ў Є®в®а®© б Ї®¬®ймо ®ЇҐа в®а  While ®аЈ ­Ё§®ў вм жЁЄ« ў Є®в®а®¬ §­ зҐ­Ёп Ї а ¬Ґва  t ¬Ґ­п«Ёбм ®в 0.5 ¤® 5 б и Ј®¬ h=0.1 . ‚뢥бвЁ ­  нЄа ­ §­ зҐ­Ёп t Ё дг­ЄжЁЁ

program pr4;
const
h=0.1; {и Ј ў жЁЄ«Ґ}
var
y,t:real;

begin
t:=0.5; {­ з «м­®Ґ §­ зҐ­ЁҐ t}
y:=0;
while t<5 do {Ї®Є  t<5 ¤Ґ« вм}
begin {б®бв ў­®© ®ЇҐа в®а}
if t<=3 then {…б«Ё t<=3 в® y ЇаЁбў®Ёвм sin(t)}
y:=sin(t)
else
y:=cos(t-3); {€­ зҐ (t>3) y=cos(t-3)}
writeln('y=',y:11:8,' t=',t:9:2);{ўлў®¤Ё¬ §­ зҐ­Ёп ­  нЄа ­ c д®а¬ вЁа®ў ­ЁҐ¬}
t:=t+h; {㢥«ЁзЁў Ґ¬ Ї а ¬Ґва ўл室  Ё§ жЁЄ«  (бзҐвзЁЄ)}
end;
end.

5)‘®бв ўЁвм Їа®Ја ¬¬г, ў Є®в®а®© б Ї®¬®ймо жЁЄ«  FOR Ї®¤бзЁв вм б㬬г ап¤  ®в 1 ¤® 100 б гб«®ўЁҐ¬ 1/i*i+i+1

program N5;
var
s:real;
i:integer;
begin
s:=0
for i:=1 to 100 do
s:=s+1/i*i+i+1;
writeln('c㬬  ап¤  = ',s);
end.

6)‘®бв ўЁвм Їа®Ја ¬¬г ў Є®в®а®© б Ї®¬®ймо ®ЇҐа в®а  Repeat Їа®в Ўг«Ёа®ў вм дг­ЄжЁо y=1/x+1 ў ¤Ё Ї §®­Ґ Ї а ¬Ґва  ®в 1 ¤® 5 б и Ј®¬ 0.01
program N6;
const
n=0.01;
var
y,x:real;
begin
x:=1;
y:=0;
repeat
y:=1/x+1;
writeln('y = ',y,' x=',x);
x:=x+h;
until x>5;
end.

7) ‘®бв ўЁвм Їа®Ја ¬¬г, ў Є®в®а®© бд®а¬Ёа®ў вм ў ¬ ббЁўҐ a[1..100] зЁб«  ”ЁЎЎ®­ зЁ.

8) ‘®бв ўЁвм Їа®Ја ¬¬г, ў Є®в®а®© бд®а¬Ёа®ў вм ¤ўг¬Ґа­л© 楫®зЁб«Ґ­­л© ¬ ббЁў  [1..20,1..20] Ё§ б«гз ©­ле зЁбҐ« Ё Ї®¤бзЁв вм бг¬¬л ¤Ё Ј®­ «Ґ© ¬ ббЁў .

‚ ¤ ­­®© Їа®Ја ¬¬Ґ ¬ ЄбЁ¬ «м­®Ґ §­ зҐ­ЁҐ б«гз ©­®Ј® зЁб«  § ¤ Ґвбп ў Є®­б⠭⥠r.
program N8;
const
r=100;
n=20;
var
a:array[1..n,1..n] of integer;
s1,s2,i,j:integer;
begin
s1:=0;
s2:=0;
randomize;
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(r);
write(a[i,j],' ');
end;
writeln;
s1:=s1+a[i,i];
s2:=s2+a[i,j-i+1];
end;
writeln('‘㬬  н«Ґ¬Ґ­в®ў ¤Ё Ј®­ «Ё');
writeln('*');
writeln(' *');
writeln(' *');
writeln('а ў­  ',s1);
writeln('‘㬬  н«Ґ¬Ґ­в®ў ¤агЈ®© ¤Ё Ј®­ «Ё = ',s2);
end.