Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

алгоритм

.doc
Скачиваний:
22
Добавлен:
17.02.2016
Размер:
352.77 Кб
Скачать

21.Процедура, приостанавливающая выполнение программы на Tмиллисекунд – это?? Delay(t)

22.Процедуру Assign(f,FileName) нужно выполнять:?? Один раз для связи файловой переменной f с файлом, имя которого хранится в параметре FileName

23.Процедура INC(x,k) :??? Увеличивает значение переменной Х на величину К

24.Процедура в программе имеет заголовок Procedure Prim(A,B:real; Var x,y:real); ее вызов будет происходить так ??? Prim(X,Y, A,B)

25.Процедуры ReadLn и WriteLn можно использовать при работе с??? текстовыми файлами

26.Процедура, позволяющая вернуть в кучу участок памяти, занятый нетипизированным указателем:??? FreeMem

27.Процедура, которая открывает существующий файл для дозаписи и устанавливает указатель на конец файла

Append

28.Пусть существует описание CONST FF=’Ученье-свет’; VAR SS:STRING. Правильно записан оператор?? SS:=FF

29.Пусть переменная S –строкового типа и значение S=’3456789’; Функция Pos(‘5’,S) возвращает??? 3

30.Пусть переменная S – строкового типа. После выполенния операторов

S:=’Это строка’; Write(length(S)) на экран будет выведено??? 10

31Пусть объявлены переменные файлового типа:

Type Sklad=Record Name:String; Num:String; Count:Integer; Date:String ; End;

Var f1:File of Sklad; f2:Text; f3:file; f4:File of Integer;

Типизированными файлами являются:??? F1,f4

32.Пусть CH –переменная типа CHAR. Из перечисленных операторов

1)CH:=#97; 2)CH:=CHR(97); 3)CH:=a; 4)CH:=’a’ укажите те, которые переменной CH

присваивают символ ‘a’. Код строчной буквы a – 97 ??? 1,2,4

33.Пусть строковая переменная QQ имеет значение “Фирма Microsoft”. В результате

выполнения оператора присваивания QQ:=Upcase(QQ)??? Переменная QQ примет значение 'R'

34.Пусть var p, q: ^integer; r: ^char; t: pointer; Какой из следующих операторов является правильным? t := p;

Пусть var p,q:^integer; r:^char; Какой из следующих операторов Object Pascal является правильным??? p:=nil;

35..program sp4;var a,b:integer; aa,bb,cc:boolean; procedure sss;

begin aa:=a<b; bb:=a>b; cc:=aa; if aa then write('A'); if bb then write('B');

if cc then write('C') end; begin read(a,b); sss end. { при a=7, b=5 } В

Р1Результат True дает отношение??? ‘pascal’>’pasca’

2 Результат выражения ORD(false)???? Равен нулю

С 1Свойство алгоритма–результативность–означает:??? Обязательное получение результата за конечное число шагов;

2 Связь между формальными и фактическими параметрами заключается в том, что они должны иметь??? Соответствие по количеству параметров, их типу и порядку следования

3.Сколько строк напечатает программа:

var k,l:integer; begin FOR k:=8 DOWNTO 1 DO FOR l:=10 TO 14 DO writeln(‘Мне нравится Паскаль.’); end.???40

4.Сколько раз будут выполнены циклы?

  1. for k:=-1 to 1 do

  2. for k:=10 to 20 do

  3. for k:=20 to 10 do

d) for k:=5; r:=15; for k:=k+1 to r-1 do??? 3, 11, 0, 9

5.Сколько раз будет выполняться тело следующего оператора цикла?

Если i,k,t – целые, k:=0; t:=0; for i:=1 to k+3 do t:=k+1;??? 3

6.Сколько компонентов содержит описанный массив? VAR MC:ARRAY OF ARRAY of CHAR;? 10

7.Сколько раз будет выполнен цикл в следующих фрагментах программы:а)for k:=-1 to 1 do б) for k:=10 to 20 do??? 3 11

8.Сколько раз будет выполнен цикл в следующих фрагментах программы:

  1. for k:=10 to 10 do

b) k:=5; r:=15;

for i:=0 to k*r do??? 1 76

9.Сколько раз будет выполнен цикл в следующих фрагментах программы:

a) for k:=20 to 10 do

b) k:=5; r:=15; for i:=k+1 to r-1 do??? 0 9

10.Сколько раз будут выполнены операторы тела цикла при выполнении следующего фрагмента программы: For K:=M Downto 1 Do If (N MOD K=0) AND (M MOD K=0) Then Goto 1; 1: Writeln(K) при N-96, M=36: ???12

11.С ключевого слова type начинается следующий раздел Паскаль-программы:??? раздел описания типов

12.Статическое размещение данных в Object Pascal означает…??? выделение памяти осуществляется компилятором в процессе компиляции программы;

13.Стандартные функции языка Паскаль??? abs(x), sqr(x), sqrt(x), sin(x), cos(x)

14.Стандартный модуль, который обеспечивает управление текстовым режимом работы экрана – это??? CRT

15.Стандартный модуль – это??? Библиотечные модули языка, содержащие константы, переменные, процедуры и функции

16.Строковая переменная t имеет значение «Фирма».В результате выполнения фрагмента

программы k:=0; For I:=1 to length (t) do K:=K+1;переменная К будет иметь значение ??? 5

17.Структура данных, состоящая из фиксированного числа компонентов разного типа, называется?? Записью

18.Существует описание типа запись TYPE List=RECORD N:integer; FIO:String; Sex:Char end;

Тип запись имеет полей??? Три

19.Существует описание TYPE T=ARRAY OF INTEGER; VAR A:T.

Правильно записан оператор вывода??? Write(a)

20.Существует описание: Type Page=Array of Char; List=Array of Page;

Var A1:Array of List; В исполняемой части программы правильно записан оператор присваивания??? А1:=’q’;

21.Существуют описания перечисляемого типа Type DAY=(MON,TUE,WED,THU,FRI,SUN); WEEKEND=(SAT,SUN).

Приведенное описание типов недопустимо, потому что:??? Пересечение констант типов DAY и WEEKEND приводит к неоднозначности

22.Существует описание TYPE UPPER=’A’..’Z”. Членами набора данных типа UPPER являются ?? Константы типа CHAR в интервале от ‘A’и ’Z’

23.Существует описание перечисляемого типа Type WEEKEND=(SAT,SUN). Значение функции SUCC(SUN)

Найдено не будет

24.Существует описание TYPE Color=(Red,Blue,Green,Yellow,Orange); Hue=Blue..Yellow.

Значение функции ORD(Blue)??? Равно единице

25.Cуществуют описания перечисляемого типа TYPE DAY=(MON,TUE,WED,THU,FRI,SAT,SUN).

правильным является утверждение??? ORD(MON)<ORD(SUN)

26.Существует описание перечисляемого типа TYPE COLOR = (Heart,Diamond,Spade,Club).

Значение функции Succ(Diamond)??? Равно Spade

27.Существует описание TYPE List=RECORD N:integer; FIO:String; Sex:Char end; Var B: List.

В результате выполнения оператора B.n:=2.33 возникнет ошибка, так как:??? Ошибка в типе переменной N

28.Существует описание TYPE Birthday=RECORD DAY,MONTH :BYTE; YEAR:WORD END;

VAR A,B: Birthday; В программе может быть использован оператор ??? A:=b

29.Существует описание TYPE Page=ARRAY of CHAR; VAR A:ARRAY of Page.

В исполняемой части программы правильно записан оператор присваивания??? A :=’g’

ТТТ Тype День недели=(пн,вт,ср,чт,пт,сб,вс) Описать множественный тип,

включающий в себя множества из названий рабочих дней недели.?? R=SET OF пн..пт;

У1. Укажите простые типы данных в Паскале?? integer, char, real, boolean, string

2. Укажите правильно записанный оператор repeat:?? repeat y:= x*x; x:=x+1 until x>20;

3. Укажите правильную процедуру ввода данных:??? readln(s,t).

4. Укажите правильный оператор присваивания на языке Паскаль для выражения a=5,75 x 2 ?? а:=5.75*sqr(x);

5.Укажите правильно записанный оператор for:??? for k:=1 to 20 do y:=x*x;

6. Укажите правильно записанную процедуру вывода данных на экран:?? writeln ('y=',y:12:3);

7. Укажите правильный оператор цикла??? while условие do Begin Операторы end;

8. Укажите правильный оператор цикла??? Repeat Операторы Until условие

9. Укажите тип переменной, если х:=5.5.??? вещественный;

10. Укажите тип переменной, если х:='5.5'.?? Строковый

11. Укажите тип переменной для выражения: ((х>=-2) и (x<=2)).??? Логический

12. Укажите тип переменной для выражения: ((х>=-2) AND (x<=4)??? Логический

13. Укажите правильно записанный оператор While??? While k<10 to begin s:=s+k; dk:=k+0.5 end;

14. Укажите правильную запись оператора присваивания:??? Im:=0; p:=1; im:=im+2; p:=p*im;

15. Укажите правильную запись оператора присваивания на языке Паскаль для выражения а=5,75x2???

A:=5.75*sqr(x);

16.Укажите стандартную функцию, результатом использования которой будет целое число??? ORD(X);

17.Укажите правильную запись оператора вывода значений действительного типа с фиксированной точкой:??? Write(X:10:3);

18.Укажите неправильное логическое условие;??? (k>=-2) AND (k<-4);

19.Укажите вариант определения вхождения подстроки ST в строку ST1??? POS(ST,ST1);

20.Укажите правильное описание матрицы Ацелых чисел: ?? A: aray of integer;

21.Укажите правильное определение Функции:??? Последовательность операторов, в результате выполнения которых вычисляется одно значение, присваиваемое имени функции

  • 22.Укажите правильный порядок следующих команд для работы с файлами в программе

1)assign 2)close 3)write 4) reset???? 1432

23. Управляет положением курсора на экране функция GOTOXY(x,y), находящаяся в стандартном модуле

CRT

ФФ. Функция ReadKey??? Возвращает символ нажатой клавиши без эхоповтора на экране

Функциональный блок изображается: ??? прямоугольником;

Функция Eof (f) предназначена для определения??? Конца файла

Функция определения конца строки для текстовых файлов – это??? Eoln(f)

ЧЧЧ Чем отличаются формальные и фактические параметры??? Формальные параметры указываются в описании процедуры/функции, а фактические – при ее вызове

Чему будет равно значение переменной М в результате выполнения серии операторов

N:=5; Y:= 3 mod 2; If Y>0 then M:=N/5+3*Y*N Else M:=888;… ??? 16

Чему будут равны значения переменных, выводимых в результате выполнения программы:

var A,B:integer; begin b:=6; a:=1; while a<10 do begin b:=b+90; a:=a+11; write (b); end end.??? 96

Чему равны значения X и Y после выполнения опeрaторов? X:=2; Y:=5; X:=Y; Y:=X;

X=5; Y=5;

Чему равно значение C после выполнения условного оператора:

a:=5; b:=3; if a <=b then c:=0 else if b<0 then c:=a;??? c=0

Чему равно значение А после выполнения условного оператора: a:=3; if a < 4 then begin a:=a+2; a:=a+3 end;?? a= 8

Чему равно ODD(15) и ODD(26)? TRUE,FALSE;

Чему равна S? VAR P,A,S:INTEGER BEGIN A:=32; p:=a; s:=0; while p>0 do

begin s:=s+p mod 10; p:=p div 10 end; WRITE(s) END.?? 5

Чему равен шаг изменения параметра цикла в операторе FOR??? Только +1 или –1

Чему равно значение переменной z после выполнения следующих операторов (Паскаль):

z:= 0; if x>0 then if y>0 then z:= 1 else z:= 2; при x=-1, y=1.?? 0

Числа в языке Pascal различаются:??? как целые и вещественные;

Число записывается в Паскале следующим образом:??? -9.6E-3

Число записывается в Паскале следующим образом:??? 0.5E-5

Что будет напечатано следующей Паскаль-программой:

program aba; var a,b:integer; BEGIN read (a,b,а) ; writeln(a,b,а) END.

если при вводе набраны числа 1, 2, и 3??? 323

Что будет выведено на печать в результате работы следующей программы:

var x: integer; begin x:= 2; writeln ('x+1') end.?? x+1

Что будет выведено на экран в результате выполнения операторов. . .

d:= ; v:= d + ;

for b:= 0 to 255 do

if b in v then write(b); . . ??? 1247

Что будет выведено на экран в результате выполнения программы:

var m,s: set of byte; b:byte;

begin m:= ; s:=m -;

for b:= 0 to 255 do

if b in s then write(b);

readln; end.??? 1247

Что будет напечатано программой

program PRAB; Var a,b:integer; Begin Read(a,b,a); Writeln(‘A+B = ’,a+b,’ A=’,a); End.

Если для ввода заданы числа 4,5,6.???? A+B=11 A=6;

Что будет выведено на экран в результате выполнения программы:

type PInt = ^integer; var m,n: PInt;

begin new(m); new(n); n^:= 4; m^:= 14;

dispose(n); n:=m; m:=nil; write(n^+2*n^);

readln; end.???42

Что будет напечатано в результате выполнения следующей программы:

program pro1; var p,q:integer; begin for q:=0 to 5 do

begin p:=3*q +1; end writeln(q,' ',p) end.??? 5 16

Что будет напечатано: var b,c,d:real; begin B:=1; c:=-2; D:=SQRT(SQR(b)-4*c);

WRITELN(X1=  , (-b+d)/2;  X2 =  ,(-b-d)/2) end.??? X1=1; X2=-2;

Что будет храниться в этих переменных при выполнении фрагментов программ при

начальных значениях: x:=5; y:=10; z:=1; w:=8; w:=y - w; z:=y div x;??? x=5, y=10, z=2, w=2

Что будет храниться в этих переменных при выполнении фрагментов программ

при начальных значениях x:=5; y:=10; z:=1;

x:=x + 1; y:=x + 1; z:=x + y; write(x,y,z) end.??? 6 7 13

Что выведет на экран программа:

var x,y: real;

BEGIN

x:= -100; y:=200;

y:= (y/x)2 - 1;

writeln(y); END.??? 3.00000000000000E+0000

Что будет напечатано?

var a,b:integer; procedure p(x:integer; var y:integer);

begin x:=x+1; y:=y+1 end;

begin a:=40; b:=40; p(a,b);

write(a,b) end??? 40 41

Что выведет на экран программа:

var x,y: real;

BEGIN

x:= -100; y:=400; y:= sqrt(y/x) - 1;

writeln(y); END.??? ошибка при компиляции

Что выведет на экран программа:

var x,y: byte;

BEGIN x:= 100; y:=200;

y:= y/x - 1; writeln(y); END.??1

Что выполняет данный фрагмент программы? Read(х); If х<0 then y:=-1 Else if х =0 then y:=0 else y:=1?

знак величины х;

Что выражает свойство алгоритма – дискретность? Разбиение алгоритма на конечное число команд.

Что выйдет на экран в результате выполнения программы?

Begin A:=15; B:=30; C:=0; Write (C); C:=A+B; End?? 0

Что выполняет фрагмент программы?

If а>b then m:=а else m:=b;

If c>m then m:=c??? находит наибольшее из трёх величин;

Что делает процедура SetBkColor? Устанавливает цвет фона

Что делает фрагмент алгоритма? If а>b then m:=а else m:=b; If c>m then m:=c ? находит наибольшее из трёх величин;

Что необходимо для реализации рекурсии в программе? Необходимо наличие процедур или функции

Что напечатается в результате выполнения программы?

B:=16; A:=10; while A>=1 do begin B:=B-1; write(B); A:=A-3; End;??? 15 14 13 12

Что необходимо выполнить до открытия файла?? Установить связь с файловой переменной

Что представляет собой метка? Все перечисленное

Что получим на экране при выполнении программы?  

var a,b:integer; begin a:=555; b:=111; а:=a+b; write(a) end.?? 666

Что происходит со значениями локальных переменных после выхода из процедуры??? При выходе из процедуры или функции локальные переменные уничтожаются.

Что произойдет, если значение селектора (СASE ..OF) не совпадет ни с одной из меток??? Управление передается оператору, стоящему после ключевого слова END, замыкающего оператор СASE

Что такое запись? Структура, предназначенная для хранения сложных данных, состоящих из

отдельных компонент различных типов

Ч то такое пустое множество и как оно задается??? Множество, не содержащее элементов, называется пустым и задается

Что такое массив ??? Это структура данных, представляющая собой однородную, фиксированную по размеру и конфигурации совокупность элементов простой или составной структуры, упорядоченных

по номерам.

Что такое составной оператор? Последовательность объединяемых операторов, расположенных

между ключевыми словами begin и end

Что такое трансляция программы? Это перевод программы с исходного языка программирования на язык машинных команд.

Что такое схема алгоритма? Все ответы верны

Что такое составной оператор??? Последовательность объединяемых операторов, расположенных

между ключевыми словами begin и end

Чтобы переместить указатель в конец файла, можно написать следующее??? Seek (f,FileSize(f))

Что является результатом работы транслятора? Объектный код

Ц 1 Целочисленное деление числа A на B … . A div B;

2 Цикл с предусловием выполняется так: проверяется условие продолжения выполнения цикла, выполняется тело цикла

3 Цикл с параметром выполняется так:?? задается начальный параметр цикла, сравнивается с конечным значением, если параметр цикла меньше или равен этому значению, то выполняется тело цикла.

4Цикл с постусловием выполняется так?? выполняется тело цикла, изменяется параметр цикла, проверяется условие продолжения выполнения цикла;

5. Цвет в Паскале задается:??? целым числом или текстовой константой.

Э 1. Элементы массива p равны соответственно 1, –1, 5, 2, 4. значение выражения

p равно:??? 6

Элементами массива в Паскале могут быть величины? любого типа, разрешенного в Паскале, кроме файлового

Элементами множества могут быть значения?? Любого порядкового типа, кроме Word, Integer, LongInt

Этап, заключающийся в определении мест возникновения ошибок, выяснении причины

их возникновения и устранении этих причин, называется этапом??? Тестирования и отладки

Эта структура называется… if < условие> then <набор команд> else <набор команд>?? полное ветвление

j=10, A=45 , Write (‘A(‘,j,’)=’,A); Что выйдет на экран монитора? А(10)=45

на языке Паскаль пишется…??? sqrt(x)

на языке Паскаль пишется… abs(x)