 |
Оператор с ключевыми словами CASE-OF-ELSE-END являются операторами
|
|
|
|
a) цикла с постусловием
b) ветвление
C) множество выбора
d) цикла с предусловием
Оператор с ключевыми словами IF-THEN-ELSE является оператором
a) цикла с постусловием
B) ветвление
c) множество выбора
d) цикла с предусловием
Оператор с ключевыми словами REPEAT-UNTIL являются операторами
A) цикла с постусловием
b) ветвление
c) множество выбора
d) цикла с предусловием
Для выполнения функции ReadKey следует включить в программу стандартный модуль
a) MS DOS
b) GRAPH
C) USES CRT
d) SYSTEM
82. Работая в компьютерном классе, ученики пишут программу, сохраняя результаты в общей папке. По окончании работы учитель увидел следующий код.
var
v,vn,st,s:integer;
begin
writeln(‘Введите вес багажа’);
readln(v);
writeln(‘Введите массу багажа, допущенную к перевозу в самолете без доплат’);
readln(vn);
writeln(‘Введите стоимость 1 кг багажа, оплачиваемую сверх нормы’);
readln(st);
v:=v+10*2;
if v>vn thenwriteln(‘Необходимо доплатить’,st*(v-vn),’рублей’) else
writeln(‘Доплачивать не нужно’);
end.
Определите результат, который выведет данная программа, при v=50, vn=25, st=10?
Ответ:450
Для досрочного выхода из процедуры надо использовать
A) команду EXIT
b) команду CLOSE
c) команду END
d) команду BEGIN
84. Работая в компьютерном классе, ученики пишут программу, сохраняя результаты в общей папке. По окончании работы учитель увидел следующий код.
var
v,vn,st,s:integer;
begin
writeln(‘Введите вес багажа’);
readln(v);
writeln(‘Введите массу багажа, допущенную к перевозу в самолете без доплат’);
readln(vn);
writeln(‘Введите стоимость 1 кг багажа, оплачиваемую сверх нормы’);
readln(st);
v:=v+(10*2);
if v>vn thenwriteln(‘Необходимо доплатить’,st*(v-vn),’рублей’) else
writeln(‘Доплачивать не нужно’);
|
|
|
end.
Определите результат, который выведет данная программа, при v=40, vn=25, st=10?
Ответ: 350
85. Для закрытия файла предназначена стандартная процедура
a) команду EXIT
B) команду CLOSE
c) команду END
d) команду BEGIN
86. Вычислить стоимость мебельного гарнитура,содержащего 4 стула, 2 кресла и 1 стол.Стоимость изделий A:=500, B:=1200 и C:=2700.
Program Situacia8;
var A:real; // цена стула B:real; // цена кресла
C:real; // цена стола Viruchka:real;
begin
Viruchka:=A*4+B*2+C*1;
Writeln('Общая выручка за весь гарнитур составила ',Viruchka,'руб.');
end.
Чему равна общая выручка за весь гарнитур (Ответ целое число)
Ответ 7100
87. В магазине продается костюмная ткань.Ее цена В руб. за квадратный метр. К усок этой ткани длиной Х метров и шириной 80см.
Program Situacia9;
var B:real; // цена ткани за 1 кв/м X:real; // длину куска ткани
Stoimost:real; // общая стоимость куска
begin
X:=5;
B:=250;
Stoimost:=X*0.8*B;
Writeln('Общая стоимость ткани длиной ',X,'метров равна ',Stoimost,'руб.');
end.
Чему равна общая стоимость ткани? (Ответ целое число)
Ответ 1000 руб.
Для очистки экрана используется функция
a) READKEY
B) CLRSCR
c) KEY PRESSED
d) TEXTCOLOR
89. Человеку нужно съездить из Лондона в расположенный в 390 милях Эдинбург. Он может ехать на автомобиле марки Роллс-Ройс,
либо на автомобиле марки Форд. Роллс-Ройс расходует 1 галлон бензина на каждые 15 миль пути. Форд расходует 1 галлон бензина на каждые 36 миль пути. С тоимость 1 галлона бензина составляет Х фунтов?
Program Situacia11;
var X:real; // стоимость одного галлона бензина
StoimostRols:real; // общая стоимость поездки на Ролс-Ройсе
begin
// вводим значение
X:=35;
StoimostRols:=390/15*X;
Writeln('Общая стоимость поездки на Роллс-Ройс составит', StoimostRols,'фунтов.');
end.
Сколько будет стоить поездка в Эдинбург на Ролс-Ройсе? Ответ целое число
Ответ: 910
90. В видеоигре игрок выигрывает50 очков, если он сбивает самолет,
100 очков, если он сбивает ракету,200 очков, если он сбивает спутник.
Program Situacia12;
var A:integer; // количество сбитых самолетов
B:integer; // количество сбитых ракет
C:integer; // количество сбитых спутников
Ochki:integer; // Количество полученных очков
begin
a:=15; b:=8; c:=3;
Ochki:=50*A+100*B+200*C;
// вывод результата
Writeln('Ответ:');
Writeln('Общее количество полученных очков ',Ochki);
end.
|
|
|
Чему равно общее количество полученных очков в видеоигре?
Ответ: 2100
Раздел описания типов данных открывается зарезервированным словом
a) LABEL
b) CONST
C) TYPE
d) VAR
92. Каждую неделю Юра получает деньги на мелкие расходы.
Из них он тратит Х рублей на сладости. Это составляет одну четверть того, что он получает еженедельно.
Юра сберегает одну треть того, что остается после покупки сладостей.
Program Situacia;
var X:integer; // на сладости
Otvet:real;// сбережения за год
begin
X:=35;
Otvet:=(365/7)*X;
Writeln('Юра экономит за год ',Otvet);
end.
Сколько Юра экономит за год? (Ответ целое число)
Ответ: 1825
93. Полторы кошки за полтора часа съедают полторы мышки.
Сколько мышек съедят X кошек за Y часов?
Program Situacia20;
var X:real; // количество кошек
Y:Real; // количество часов
H:real; // количество мышек
begin
// вводим значении
X:=3;
Y:=15;
H:=Y*X*2/3;
Writeln('Общее количество съеденных мышей: ',H);
end.
Чему равно Общее количество съеденных мышей? (Ответ целое число)
Ответ: 30
96. Язык программирования Паскаль является:
1. языком машинных команд
2. языком высокого уровня
3. языком управления базами данных
4. языком манипулирования данными
97. При написании программ на языке Паскаль, для ввода информации (переменных) используется оператор:
Ответ: Read или Readln
98. П ри написании программ на языке Паскаль, для вывода информации (переменных) используется оператор:
Ответ: Write или Writeln
99. Целочисленный тип в Паскале описывается служебным словом:
1. integer
2. real
3. сhar
4. boolean
100. Результат выполнения операции 5 mod 2:
Ответ: 1
101. Результат выполнения операции 8 mod 2:
Ответ: 0
102. Результат выполнения функции sqr(4):
1. 2
2. 4
3. 8
4. 16
103. Результат выполнения операции 9 div 2:
Ответ: 4
104. Результат выполнения операции 10 mod 2:
Ответ: 0
105. Какой из разделов программы является первым:
1. var
Label
3. type
4. const
106.Результат выполнения операции 14 div 3:
Ответ:4
Для описания переменных используется служебное слово
Ответ: var
108. Каких функций не существует в Паскале:
1. X 2
2. sin(x)
3. cos(x)
4. sqr(x)
109. Результат выполнения операции 2 mod 2:
Ответ: 0
|
|
|
110. Если заранее число повторении(цикл), программе используется оператор цикла:
Ответ: цикл с параметром
111. Язык программирования Паскаль является:
1. языком машинных команд
2. языком высокого уровня
3. языком управления базами данных
4. языком манипулирования данными
112. Найти значение с для заданных а=3,b=2,с=4,n=2:
for i:=1 to n do
с:= c+(a*b);
Ответ: 16
113. Какое значение будет иметь переменная d для заданных а=5, b=3, с=1:
if (a<b) and (b<c) then d:= c-a+b
else
if (a>b) and (b>c) then d:= a-b+c
else
if (a>b) and (b<c) then d:= a-c+b;
Ответ: 3
114.Целочисленный тип в Паскале описывается служебным словом:
1. integer
2. real
3. сhar
4. boolean
115. Результат выполнения операции 5 mod 2:
Ответ: 1
116. Найти значение c при а=3,b=5,с=1:
while a<b do
begin
с:= c+(a*b);
а:= a+1;
еnd;
Ответ: 31
117. Результат выполнения функции sqr(4):
1. 2
2. 4
3. 8
4. 16
118. Результат выполнения операции 9 mod 2:
Ответ: 1
119. Найти значение С при а=10, b=5:
repeat
b:= b+1;
a:= a-b;
c:= a+b;
until a≤0;
Ответ: 4
120. Какой из разделов программы является первым:
1. var
2. label
3. type
4. const
121.Результат выполнения операции 14 div 3:
Ответ: 4
122. Найти значение с для заданных а=3,b=2,с=4,n=4:
for i:=1 to n do
с:= c+(a*b);
Ответ: 28
123. Каких функций не существует в Паскале:
1. cos(x)
2. sin(x)
Tg(x)
Ctg(x)
124. Результат выполнения операции 14 mod 2:
Ответ: 0
126. Работая в компьютерном классе, ученики пишут программу, сохраняя результаты в общей папке. По окончании работы учитель увидел следующий код.
var
v,vn,st,s:integer;
begin
writeln(‘Введите вес багажа’);
readln(v);
writeln(‘Введите массу багажа, допущенную к перевозу в самолете без доплат’);
readln(vn);
writeln(‘Введите стоимость 1 кг багажа, оплачиваемую сверх нормы’);
readln(st);
if v>vn then writeln(‘Необходимо доплатить’,st*(v-vn),’рублей’) else
writeln(‘Доплачивать не нужно’);
end.
Определите результат, который выведет данная программа, при v=50, vn=25, st=10?
Введите ваш ответ: 250
127. Какое значение переменной S будет напечатано после выполнения фрагмента программы на Паскале?
A:=5
B:=4
S:=A+B
Writeln (Sqr(S) + 1);
Введите ваш ответ:82
|
|
|
