
Добавил:
Oksana
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Неизвестный номер контрольной работы / 0- 9_Информатика
.txt ‚ аЁ в 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.
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.
Соседние файлы в папке Неизвестный номер контрольной работы