Program T22;
Label 1,2; Var A,B: Integer;
Begin Readln(A,B);
1: If A=B Then Goto 2;
If A>B Then A:=A–B Else B:=B–A; Goto 1;
2: Writeln(‘’,A)
End.
òåëîì öèêëà ÿâëÿåòñÿ:
а)
оператор If A>B
Then A:=A–B
Else B:=B-A;
б)
операторы If A>B
Then A:=A–B
Else B:=B-A;
Goto 1;
в)
операторы If A=B Then Goto 2;
If A>B
Then A:=A–B
Else B:=B–A;
г)
операторы 1: If A=B Then Goto 2;
If A>B Then A:=A–B
Else B:=B–A;
Goto 1.
96.
Сколько раз будут выполнены операторы тела цикла при выполнении следующего фрагмента программы:
A:=1; N:=0; S:=0;
While A>1/1050 Do Begin A:=Exp(–N*Ln(2)):
S:=S+A End;
а)
1050;
б)
11;
в)
10;
г)
100.
97.
Сколько раз будут выполнены операторы тела цикла при выполнении следующего фрагмента программы:
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:
а)
25;
б)
24;
в)
36;
г)
12.
98.
Дана программа:
Program T26; Var a: array[1..8] of Integer; M, k:
Integer;
Begin For k:=1 to 8 Do Readln(a[k]); M:=a[1];
For k:=2 to 8 Do If M<a[k] Then M:=A[k]; Write(M)
End.
Сколько раз будет исполнен оператор M:=A[k] при заданном массиве: 3, 8, 7, 9, 4, 10, 2, 12:
а)
7;
б)
8;
в)
4;
г)
1.
99.
Ôðàãìåíò ïðîãðàììû:
K:=1; While (A[K] <> X) AND (K<=10) Do K:=K+1;
çäåñü X=7, à â êà÷åñòâå ýëåìåíòîâ ìàññèâà ââåäåíû ÷èñëà:
2, 3, 5, 7, 9, 12, 0, 7, 6, 7:
Ïîñëå èñïîëíåíèÿ ôðàãìåíòà ïðîãðàììû K áóäåò ðàâíî:
а)
8;
б)
1;
в)
10;
г)
4.
100.
Ïðè íàáîðå ïðîãðàììû âû÷èñëåíèÿ ñóììû îòðèöàòåëüíûõ ýëåìåíòîâ ìàññèâà:
Program T28; Var a: array[1..8] of Integer; s, k:
Integer;
Begin For k:=1 to 8 Do Readln(a[k]); s:=0;
For k:=1 to 8 Do If a[k]<0 Then s:=s+a[k];
Writeln(s)
End.
â çàïèñè îïåðàòîðà s:=s+ a[k] áûëà äîïóùåíà îøèáêà — âìåñòî íåãî áûë çàïèñàí îïåðàòîð s:=s+1. Êàêèì îêàçàëñÿ îòâåò ïîñëå èñïîëíåíèÿ íåâåðíîé ïðîãðàììû, åñëè â êà÷åñòâå ýëåìåíòîâ ìàññèâà áûëè ââåäåíû ÷èñëà: –1, 3, –2, 4, –5, 6, –7, 8:
а)
–3;
б)
–15;
в)
4;
г)
8.
101.
Дана программа:
Program T29;
Var a: array[1..4, 1..4] of Integer; b: array[1..16] of
Integer; g, k,q: Integer;
Begin
For k:=1 to 4 Do For g:=1 to 4 Do a[k,g]:=g–k; q:=0;
For k:=1 to 4 Do For g:=1 to 4 Do If a[k,g]<0 Then
Begin q:=q+1; b[q]:= a[k,g] End;
m:=b[1]; For k:=1 to q Do If m< b[k] Then m:=b[k];
Writeln(m)
End.
При ее выполнении на экран будет выведено число:
а)
0;
б)
–3;
в)
–1;
г)
3.
102.
В языке программирования Pascal основное различие между процедурами и функциями заключается в том, что:
а)
в результате работы процедуры можно получить любое количество данных, а функции — только одно;
б)
в процедуре допускается описание локальных переменных, а в функции — нет;
в)
в программе обращение к процедуре может осуществляться многократно, тогда как к функции только один раз;
г)
в процедуре допускается использование глобальных переменных, а в функции — нет.
103.
Формальные параметры процедуры:
а)
описываются в ее заголовке;
б)
перечисляются при вызове процедуры;
в)
указываются при описании данных в программе;
г)
указываются при описании промежуточных переменных процедуры.
104.
Фактические параметры процедуры:
а)
описываются в ее заголовке;
б)
перечисляются при вызове процедуры;
в)
указываются при описании данных в программе;
г)
указываются при описании промежуточных переменных процедуры.
105.
Результатом вычисления функции
Copy(‘информатика’,3,5)
будет слово:
а)
атика;
б)
рма;
в)
форма;
г)
инфор.
106.
Результатом работы программы:
Program T34;
Var x: string[6];
Begin x:=’мим’+’озадаченный’; Writeln(x) End.
будет слово:
а)
мим озадаченный;
б)
мимозадаченный;
в)
мимоза;
г)
озадаченный мим.
107.
Запись — это:
а)
совокупность разнородных данных, описываемых и обрабатываемых как единое целое;
б)
именованный набор с фиксированным количеством однотипных данных;
в)
ограниченная апострофами последовательность любых символов;
г)
именованный набор однотипных данных на диске.
108.
Логическим именем файла в языке программирования Pascal называют:
а)
имя переменной, использующейся в программе при осуществлении операций над файлом;
б)
имя файла, под которым он записан на внешнем устройстве;
в)
имя программы;
г)
имя файла, под которым программа хранится на диске.
109.
Физическим именем файла в языке программирования Pascal называют:
а)
имя программы;
б)
имя переменной, использующейся в программе при осуществлении операций над файлом;
в)
имя файла, под которым он записан на внешнем устройстве;
г)
имя файла, под которым программа хранится на диске.
110.
Функция обработки признака конца файла F имеет вид:
а)
REWRITE(F);
б)
RESET(F);
в)
CLOSE(F);
г)
EOF(F).
111.
В какую из перечисленных ниже структур можно объединять данные различного типа:
а)
запись;
б)
файл;
в)
массив;
г)
множество.
112.
Что определяет структура данных:
а)
диапазон допустимых значений;
б)
внутреннее представление каждого элемента структуры;
в)
взаимное расположение, способ связи и выборки элементов структуры в памяти ПК;
г)
способ упорядочения переменных.