Программирование 1. Программирование 2. ККР

Контрольная работа
в среде программирования ККР



Если Вы считаете, что данная страница каким-либо образом нарушает Ваши авторские права, то Вам следует обратиться в администрацию нашего сайта по адресу info@kursovik.com либо через форму обратной связи

Среда программирования: ККР

Название работы: Программирование 1. Программирование 2. ККР

Вид работы: Контрольная работа

Описание: Контрольная работа по дисциплине 'Программирование 1'

Процедурное программирование

Question 1
Для каждой из процедур определите, какие из ее параметров являются параметрами-значениями.
• procedure P(x, y, z: integer);
begin y:=x+z end;
• procedure Q(x: integer; var y: integer);
begin y:=x+1 end;
• procedure R(var x, y: integer);
begin y:=x+1 end;
В ответ введите суммарное количество параметров-значений для этих трех процедур.
Пример ввода ответа: 3

Основные понятия языка Паскаль

Question 2
Запишите указанное действие в виде одного условного оператора.
y= x2,приx<0,x,приx>0,0,иначе.
• if (0<x) then y:=x else if x<0 then y=sqr(x);
• if (x>=0) and (x<=0) then y:=x else y:=sqr(x);
• if x>0 then y:=x else y:=sqr(x);
Выберите все верные ответы (может быть несколько или один).

Основные понятия языка Паскаль

Question 3
Какие утверждения истинны?
• '1' = 1
• ord('1') = 1
• если c – литера и '0'&#8804;c&#8804;'9', то c – цифра
• если c – литера и 'A'&#8804;c&#8804;'Z', то c – большая латинская буква
Выберите все верные ответы (может быть несколько или один).

Модули

Question 4
Какие утверждения правильны?
• Интерфейс – это то, что используется в других модулях и программах. Сюда входит описание объектов, доступных (видимых) из других программ.
• Модули – компилируемые и тестируемые программные единицы со строго определенными интерфейсами, которые должны компилироваться только с главной программой.
• Реализация – это то, что используется только в данном модуле. Эта часть содержит описание объектов, недоступных (невидимых, скрытых) другим программам.
Выберите все верные ответы (может быть несколько или один).

Записи

Question 5
Даны описания:
type point1 = array [(x, y)] of real;
point2 = record x, y: real end;
complex = record re, im: real end;
var p1: point1; p2: point2; c: complex;
Выберите допустимую конструкцию.
• p1[succ(x)]
• p2.pred(x)
• c.succ(x)
Выберите все верные ответы (может быть несколько или один).

Строки

Question 6
Какие утверждения верны?
• Максимальная длина строковой переменной может быть определена с помощью встроенной функции length.
• Строки считаются равными, если они совпадают по длине и содержат одни и те же символы на соответствующих местах в строке.
• К отдельным символам строки можно обратиться по номеру (индексу) данного символа в строке.
Выберите все верные ответы (может быть несколько или один).

Массивы

Question 7
Укажите строки, содержащие ошибки в программе.
• var x, y: array [1..20] of real;
• z, u: array [1..50] of real;
• i: integer;
• begin read(z, u);
• if x<>y then begin z:= x;
• x:=y; end
• else x:=x+y;
• for i:=1 to 20 do u:=x+y;
• z:=x;
• writeln(x) end.
Выберите все верные ответы (может быть несколько или один).

Тестирование и отладка

Question 8
Что вычисляет представленная программа, если мы вводим n натуральных чисел a1, a2, …, an?
var n, a, k, i: integer;
begin
writeln('Введите количество натуральных чисел');
readln(n);
k:=0;
writeln('Введите ', n, ' натуральных чисел');
for i:=1 to n do
begin
readln(a);
if sqr(trunc(sqrt(a)))=a then k:=k+1;
end;
writeln(k);
end.
• Количество полных квадратов среди a1, a2, …, an.
• Количество удвоенных нечетных чисел среди a1, a2, …, an.
• Количество квадратов нечетных чисел среди a1, a2, …, an.
• Количество квадратов четных чисел среди a1, a2, …, an.
• Количество удвоенных полных квадратов среди a1, a2, …, an.
Выберите все верные ответы (может быть несколько или один).

Основные вычислительные структуры. Описание синтаксиса языка

Question 9

Пусть формальный язык с алфавитом из четырех символов {x, y, z, w} описывается следующими формулами Бэкуса-Наура:
• <выражение>::=<категория2><категория1>
• <выражение>::=<категория1><категория2>
• <категория1>::=x|y
• <категория2>::=z|w
Какие следующие синтаксические цепочки символов принадлежат множеству значений понятия <выражение>?
• yz
• xx
• zy
• yw
• wx
• wy
Выберите все верные ответы (может быть несколько или один).

Основные операторы

Question 10
Эта программа написана для вычисления факториала числа n. По определению факториал n равен 1*2*…*(n–1)*n.
var n, f, k: integer;
begin
readln(n); f:=1; k:=0;
while k<>n do
begin f:=k*f; k:=k+1; end;
writeln(f)
end.
Что будет выведено на экран, если n=4?
Введите слово, словосочетание или символьно-цифровое выражение.

Файлы

Question 11
var f: file of integer; x, y: integer;
Пусть файл f содержит два элемента 5 и 7 (в данном порядке). Определите, какое значение будет иметь переменная y после выполнения следующих операторов:
reset(f); y:=3;
while not eof(f) do
begin read(f, x); y:=y*x end;
Введите слово, словосочетание или символьно-цифровое выражение.

Рекурсивные программы

Question 12
Рассмотрите следующее описание функции:
function f(x: integer): integer;
begin
if x<=10 then f:=0 else f:=f(f(f(x-10)))
end;
Каким будет значение f(20)?
Введите слово, словосочетание или символьно-цифровое выражение.

Множества

Question 13
Какие из следующих конструкций являются множествами (в смысле языка Паскаль)?
• [9,6,9,0]
• [[], 5]
• [15..1, 4..18]
• ['*', '*']
• [0..0.1]
Выберите все верные ответы (может быть несколько или один).

Динамические структуры данных

Question 14
var x: ^integer; y: ^integer;
Какие операторы допустимы?
• x:=y;
• x^:=x;
• dispose(x^);
• new(y);
• x:=y^;
Выберите все верные ответы (может быть несколько или один).

Перечислимый тип

Question 15
Укажите строки правильно описанных типов.
• type letter = ('x', 'y', 'z', 'w');
• type vowel = (а, е, i, o, u); {гласная}
• type consonant = (b..d, f, g); {согласная}
• type card = (metr, kilo, 1000, 100);
• type number = (1, 0, 2.71828, 3.1415);
Выберите все верные ответы (может быть несколько или один).

Контрольная работа по дисциплине 'Программирование 2'

Основные понятия языка Паскаль

Question 1
Дан фрагмент программы:
Var a, b, c: char; d, g: real; t, f: boolean;
Выберите выражения, записанные верно.
• b:='12';
• a:=succ('v');
• b:=a*g;
• t:=d or f;
• a:='a';
• c:=pred(a);
• b:='5';
Выберите все верные ответы (может быть несколько или один).

Перечислимый тип

Question 2
Какое значение будет выведено на экран после выполнения программы?
type dvig = (vverh, vniz, vpravo, vlevo);
var x, y: dvig; t: (vpered, nazad); k: integer;
begin
k:=ord(nazad)+ord(vpravo);
writeln (k);
end.
Введите слово, словосочетание или символьно-цифровое выражение.

Процедурное программирование

Question 3
Дана программа:
Var a,b,c,d:integer;
Function sum(a,b:integer):integer;
Var s:integer;
Begin
a:=a+2; b:=b+1;
s:=a+b;
sum:=s;
End;
Begin
a:=3; b:=5; c:=12; d:=10;
writeln(sum(c,d)-c);
end.
Что будет выведено на экран в результате выполнения программы?
Введите слово, словосочетание или символьно-цифровое выражение.

Динамические структуры данных

Question 4
Для создания динамической переменной используют процедуру:
• Close
• Assign
• Append
• New
• Nil
• Dispose
Выберите все верные ответы (может быть несколько или один).

Записи

Question 5
Дан фрагмент программы:
Type aaa = record a, b: integer; c: char; end;
Var z: aaa;
Выберите строки, в которых есть ошибки обращения к записи.
• z[a]:=2; z:=9; z[c]:=succ('c'); end;
• z.a:=1; z.b:=z.a*8; z.c:='+';
• z.a:=succ('3'); z.b:=2+8; z.c:='x';
• With z do begin a:=25; b:=2+8; c:='c'; end;
Выберите все верные ответы (может быть несколько или один).

Основные операторы

Question 6
Выберите конструкции, которые используются для представления оператора цикла с постусловием.
• If <условие> Then <оператор1> Else <оператор2>;
• If <условие> Then <оператор>;
• Repeat <оператор1>; <оператор2>; until <условие>;
• While <условие> Do <оператор>;
• For <переменная>:=<выражение1> to <выражение2> do begin <оператор1>; <оператор2>; end;
• While <условие> Do begin <оператор1>; <оператор2>; end;
• For <переменная>:=<выражение1> to <выражение2> do <оператор>;
Выберите все верные ответы (может быть несколько или один).

Файлы

Question 7
Выберите строку, в которой верно определена файловая переменная.
• Var f: set of file;
• Var f: file in integer;
• Var f: file of file;
• Var t: string of file;
• Var f: file of real;
Выберите все верные ответы (может быть несколько или один).

Строки

Question 8
Какие операторы допускается использовать для работы со строками?
• >
• +
• /
• Not
• *
• >=
• Mod
Выберите все верные ответы (может быть несколько или один).

Основные вычислительные структуры. Описание синтаксиса языка

Question 9
Бесконечные последовательности в языке Паскаль представлены с помощью:
• массивов
• записей
• множеств
• файлов
Выберите все верные ответы (может быть несколько или один).

Множества

Question 10
Выберите выражения, которые являются истинными для понятия «множество».
• Количество элементов в множестве не должно быть более 256.
• Элементы в множестве располагаются в порядке возрастания.
• Множество – это составной тип данных.
• Множество – это простой тип данных.
• Количество элементов в множестве не ограничено.
Выберите все верные ответы (может быть несколько или один).

Массивы

Question 11
Данные какого типа могут выступать в качестве индекса массива?
• Вещественные типы данных
• Операторы
• Файловый тип данных
• Константы и переменные порядковых типов
Выберите все верные ответы (может быть несколько или один).

Основные операторы

Question 12
Дан фрагмент программы:
b:=6; k:=1; a:=2;
While k<b do
k:=k*a;
Writeln(k);
Сколько раз будет работать цикл?
В ответ введите число.
Пример ввода ответа: 12
Введите слово, словосочетание или символьно-цифровое выражение.

Процедурное программирование

Question 13
Даны заголовки процедур. Выберите строки, в которых содержатся ошибки.
• Procedure Var(a:integer; c:real);
• Procedure Primer(var a:integer; c:function);
• Procedure Primer(var a:integer; c:real);
• Procedure Primer(var a:integer; c:real):integer;
• Procedure Primer(var a,b:integer; c,d:real);
Выберите все верные ответы (может быть несколько или один).

Рекурсия

Question 14
Дана рекурсивная функция:
Function f (n: integer): integer;
begin
if n=0
then f:=0
else f:=f(n-1)+n;
end;
Какую задачу решает эта функция?
• Находит сумму натуральных чисел до n.
• Находит произведение n чисел Фибоначчи.
• Находит факториал числа n.
• Эта функция не является рекурсивной.
• Находит произведение n элементов массива.
Выберите все верные ответы (может быть несколько или один).

Модули

Question 15
Для построения линий в графическом режиме используют процедуры:
• SetLineStyle и SetColor
• Line и LineTo
• OutText и OutTextXY
• PutPixel и GetPixel
Выберите все верные ответы (может быть несколько или один).

Год: 2020

Данный заказ (контрольная работа) выполнялся нашим сайтом в 2020-м году, в рамках этого заказа была разработана программа в среде программирования ККР. Если у Вас похожее задание на программу, которую нужно написать на ККР, либо на другом языке программирования, пожалуйста заполните форму, приведённую ниже, после чего Ваше задание в первую очередь рассмотрит наш программист, выполнявший в 2020-м году этот заказ, если он откажется, то Ваше задание оценят другие наши программисты в течение 48-и часов, если оценка нужна срочно, просим Вас оставить пометку об этом - напишите в тексте задания фразу "СРОЧНЫЙ ЗАКАЗ".

Купить эту работу

Тел.: +79374242235
Viber: +79374242235
Telegram: kursovikcom
ВКонтакте: kursovikcom
WhatsApp +79374242235
E-mail: info@kursovik.com
Skype: kursovik.com