Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
ТПиМА-Экзамен-АИ-35.doc
Скачиваний:
1
Добавлен:
01.04.2025
Размер:
224.26 Кб
Скачать
  • Раздел Var

  • Раздел Begin… end

  • Раздел const

  • Раздел Uses

  1. Сколько раз выполнится цикл? a := -1; b := 1; While a * b < 8 Do begin a := a *(- 1); b := b + 2 end;

  • 4 раза

  • 5 раз

  • 6 раз

  • 1 раз

  • Бесконечное количество

  1. Какой цикл будет бесконечным?

  • y:=6; While x < 5 do x:=y+1;

  • y:=1; While x < 5 do y:=y+1;

  • y:=1; While x < 5 do x:=y+1;

  • x:=6; While x < 5 do y:=y+1;

  1. Чему равняется A? A:=20/4*12/4

  • 5/3

  • 15

  • 5

  • 240

  1. Чему равно a? a:=0; b:=23; c:=25-b; a:=a+c;

  • 25

  • 2

  • 0

  • 23

  • -2

  1. . Чему равно a? a:=5; b:=3; b:=a; a:=b;

  • 5

  • 3

  • 8

  • Компилятор выдаст ошибку

  1. . Операторы отделяются друг от друга...

  • Двоеточием

  • Точкой

  • Запятой

  • Пробелом

  • Точкой с запятой

  1. Как в Pascal обозначаются комментарии?

  • //Текст

  • {Текст}

  • / Текст /

  • <!-- Текст>

  1. Какая из следующих операций является наиболее приоритетной?

  • +

  • <>

  • div

  • or

  • not

  1. Укажите пример неправильного идентификатора

  • LocalBet

  • Big gun

  • Mini_128_znach

  • B

  1. Для чего необходим оператор Writeln

  • Вывод данных на экран

  • Запись данных в файл

  • Считывание данных с файла

  • Считывание данных с клавиатуры

  1. Вместе со служебным словом if обязательно должно использоваться слово...

  • Begin

  • Else

  • Then

  • End

  1. Как правильно объявляется массив?

  • A[1,3]

  • A(1,3)

  • A(1:3)

  • A[1..3]

  1. Слово Var ставится в начале

  • Перечня констант

  • Списка меток

  • Описания переменных

  • Цикла

  1. Какое значение будет иметь переменная х после выполнения следующих строк программы: x:=2; y:=x+1; x:=y*x; y:=y+x; x:=x – y;

  • -1

  • -4

  • -3

  • 5

  • 3

  1. Выберите правильный вариант вывода на экран значения переменной z:

  • writeln z;

  • writeln [‘z’];

  • writeln (z);

  • writeln ‘z’;

  • writeln (‘z’);

  1. Чему будет равно значение переменной n после выполнения следующих инструкций? n:=0; while n<=5 do n:=n+1;

  • 3

  • 4

  • 5

  • 6

  1. Что изменяет операция присваивания?

  • тип переменной

  • имя переменной

  • значение переменной

  • тип алгоритма

  1. Каково будет значение переменной Х после выполнения операций присваивания: Х:=5; Х:=Х+1; Х:=2+Х*2;

  • 12

  • 13

  • 14

  • 15

  1. Чему равно значение выражения 302564 div 100 mod 1000 ?

  • 25

  • 256

  • 2

  • 2564

  1. Каково будет значение переменной Х после выполнения операций присваивания: Х := 3 + 2; Х := 4; Х := 2 + Х* 2;

  • 10

  • 8

  • 9

  • 4

  1. Что из ниже перечисленного не входит в набор основных символов Турбо Паскаля ?

  • латинские строчные и прописные буквы

  • служебные слова

  • десять цифр

  • русские строчные и прописные буквы

  • знак подчеркивание

  1. Какой компонент в Delphi служит для отображения текста?

  • Label

  • Button

  • StringGrid

  • CheckBox

  1. Какой компонент в Delphi служит для ввода и отображения текста?

  • Label

  • Edit

  • MessageBox

  • Edic

  1. Какой компонент в Delphi служит для ввода и отображения большого объема текста?

  • Label

  • Edit

  • Memo

  • Nemo

  1. Какой компонент в Delphi позволяет выполнить какие-либо действия при нажатии кнопки во время выполнения программы?

  • Button

  • Burton

  • Batton

  • Barron

  1. В какой вкладе в Object Inspector можно изменить свойство компонента в Delphi?

  • Prospecties

  • Properties

  • Events

  • Caption

  1. Для ввода исходных данных служит компонент:

  • Edit

  • Button

  • Label

  • Memo

  1. Что делает функция FloatToStr ( n ) в Delphi?

  • Преобразует материальное n в строку

  • Преобразует целочисленного n в строку

  • Преобразует вещественное n в строку

  • Преобразует символьное n в строку

  1. Что делает функция IntToStr (k) в Delphi?

  • Преобразует вещественное k в строку

  • Преобразует целое k в строку

  • Преобразует символьное k в строку

  • Преобразует строку k в символ

  1. Что означает функция StrToInt (s) в Delphi?

  • Преобразует строку s в вещественное

  • Преобразует строку s в символ

  • Преобразует строку s в интересное

  • Преобразует строку s в целое

  1. Что означает функция StrToFloat (s) в Delphi?

  • Преобразует строку s в вещественное

  • Преобразует строку s в символ

  • Преобразует строку s в плавающее

  • Преобразует строку s в целое

  1. Что получается в результате выполнения функции Round (s) в Delphi?

  • Целое, полученное путем округления s по известным правилам

  • Целое, полученное путем отбрасывания дробной части s

  • Дробное, представляющее собой дробную часть вещественного s

  • Дробное, представляющее собой целую часть вещественного s

  1. Что получается в результате выполнения функции Trunc (s) в Delphi?

  • Целое, полученное путем округления s по известным правилам

  • Целое, полученное путем отбрасывания дробной части s

  • Дробное, представляющее собой дробную часть вещественного s

  • Дробное, представляющее собой целую часть вещественного s

  1. Что получается в результате выполнения функции Int ( n ) в Delphi?

  • Целое, полученное путем округления n по известным правилам

  • Целое, полученное путем отбрасывания дробной части n

  • Дробное, представляющее собой дробную часть вещественного n

  • Дробное, представляющее собой целую часть вещественного n

  1. Что получается в результате выполнения функции Frac ( n ) в Delphi?

  • Целое, полученное путем округления n по известным правилам

  • Целое, полученное путем отбрасывания дробной части n

  • Дробное, представляющее собой дробную часть вещественного n

  • Дробное, представляющее собой целую часть вещественного n

  1. Как называется функция, позволяющая получить целое число, полученное путем округления вещественного числа?

  • Round(x)

  • Frac(x)

  • Trunc(x)

  • Int(x)

  1. Как называется функция, позволяющая получить целое число, полученное путем отбрасывания дробной части?

  • Round(x)

  • Frac(x)

  • Trunc(x)

  • Int(x)

  1. Как называется функция, позволяющая получить дробное число, представляющее собой дробную часть вещественного числа?

  • Round(x)

  • Frac(x)

  • Trunc(x)

  • Int(x)

  1. Как называется функция, позволяющая получить дробное число, представляющее собой целую часть вещественного числа?

  • Round(x)

  • Frac(x)

  • Trunc(x)

  • Int(x)

  1. Какая процедура выводит на экран окно с текстом и командной кнопкой ОК в Delphi?

  • SnowMessage

  • ShowMesage

  • Show_Mesage

  • ShowMessage

  1. В каком свойстве компонента Label можно вывести текстовую информацию?

  • Text

  • Memo

  • Caption

  • Information

  1. Как правильно вывести значение целочисленной переменной k в компонент Label?

  • k:=1; Label1.Caption:=k;

  • k:=1; Label1.Caption:=IntToStr(k);

  • k:=1; Label1.Caption:=FloatToStr(k);

  • k:=1; Label1.Caption:=StrToInt(k);

  1. Как правильно вывести значение вещественной переменной k в компонент Label?

  • k:=1; Label1.Caption:=StrToInt(k);

  • k:=1; Label1.Caption:=IntToStr(k);

  • k:=1; Label1.Caption:=FloatToStr(k);

  • k:=1; Label1.Caption:=StrToFloat(k);

  1. Выберите правильно написанный блок операторов, использующих целочисленную переменную k:

  • k:=2; Label1.Text:=IntToStr(k);

  • k:=2; Label1.Caption:=IntToStr(k);

  • k:=2; Label1.Text=IntToStr(k);

  • k:=2; Label1.Caption=IntToStr(k);

  1. Выберите правильно написанный блок операторов, использующих вещественную переменную k:

  • k:=2; Label1.Text:=FloatToStr(k);

  • k:=2; Label1.Caption:=FloatToStr(k);

  • k:=2; Label1.Text=FloatToStr(k);

  • k:=2; Label1.Caption=FloatToStr(k);

  1. В какое свойство компонента Edit можно записать информацию?

  • Caption

  • Text

  • Memo

  • Info

  1. Что будет содержаться в компоненте Label после выполнения следующих операторов? label1.caption:='' for i:=2 to 10 do begin label1.caption:=label1.caption + '*';

  • 10 символов *

  • 9 символов *

  • 1 символ *

  • ничего

  1. Вставьте пропущенное слово в оператор цикла: while условие <пропуск> begin .. end;

  • Until

  • Do

  • Repeat

  • to

  1. Вставьте пропущенное слово в оператор цикла: for счетчик:=нач_знач <пропуск> кон_знач do begin .. end;

  • Do

  • To

  • While

  • for

  1. Вставьте пропущенное слово в оператор цикла: Repeat инструкции <пропуск> условие:

  • While

  • Do

  • To

  • until

  1. Чему равна стандартная длина String по умолчанию?

  • 255

  • 10

  • 100

  • 1000

  1. Какая функция получает возвращает длину строки?

  • Lenght(s)

  • Lengt(s)

  • Length(s)

  • Lengh(s)

  1. Чему станет равна переменная s после выполнения следующих операторов? p:='Город Санкт-Петербург'; s:=delete(p,7,6);

  • Город Петербург

  • Город нкт-Петербург

  • анкт-Петербург

  • Город С

  1. Как называется функция, которая определяет положение подстроки в строке?

  • position (Подстрока,Строка) ;

  • pos (Подстрока,Строка) ;

  • post (Подстрока,Строка) ;

  • poz (Подстрока,Строка) ;

  1. Чему будет равно значение переменной p после выполнения оператора р:=pos('Пе','Санкт-Петербург'); ?

  • 7

  • 8

  • 6

  • 9

  1. Как называется процедура обработки событий в Delphi, которая выполняется после нажатия клавиши?

  • KeyDown

  • KeyPress

  • PressKey

  • Press

  1. Чему будет равна переменная x после выполнения следующих операторов? a:=2; b:=3; x:=a+b; x:=x*a*b;

  • 5

  • 15

  • 6

  • 30

  1. Чему будет равна переменная x после выполнения следующих операторов? a:=2; b:=3; x:=a*b; x:=x+a*b;

  • 5

  • 12

  • 6

  • 36

  1. Чему будет равна переменная x после выполнения следующих операторов? a:=1; b:=1; x:=a*b; x:=x+a*b;

  • 1

  • 2

  • 3

  • 4

  1. Чему будет равна переменная x после выполнения следующих операторов? a:=10; b:=2; x:=a/b; x:=x/a*b;

  • 5

  • 10

  • 2

  • 1

  1. Чему будет равна переменная x после выполнения следующих операторов? a:=3; b:=ln( a ); x:=exp( b );

  • 3

  • 9

  • e

  • 30

  1. Чему будет равна переменная x после выполнения следующих операторов? a:=5; b:=sqr( a ); x:=sqrt( b );

  • 5

  • 25

  • 1

  • 125

  1. Чему будет равна переменная x после выполнения следующих операторов? a:=3; b:=a/2; x:=trunc( b );

  • 1

  • 0.5

  • 1.5

  • 0

  1. Чему будет равна переменная x после выполнения следующих операторов? a:=3; b:=a/2; x:=frac( b );

  • 1

  • 0.5

  • 1.5

  • 0

  1. Чему будет равна переменная x после выполнения следующих операторов? a:=3; b:=a/2; x:=round( b );

  • 1

  • 2

  • 1.5

  • 0

  1. Чему будет равна переменная x после выполнения следующих операторов? a:=5; b:=10; x:=a+b/2;

  • 5

  • 10

  • 7.5

  • 2

  1. Как записать на языке Pascal следующее условие: Магазин работает только с 8 до 17 часов, где переменная t – время работы?

  • (t<8) and (t>17)

  • (t>8) and (t<17)

  • (t<8) or (t>17)

  • (t>8) or (t<17)

  1. Как записать на языке Pascal следующее условие: Магазин работает в любое время, кроме обеда с 13 до 15 часов, где переменная t – время работы?

  • If (t<13) and (t>15)

  • If (t>13) and (t<15)

  • If (t<13) or (t>15)

  • If (t>13) or (t<15)

  1. Как записать на языке Pascal следующее условие: Будет ли год високосным, где переменная g - год?

  • If g mod 4 = 0;

  • If g div 4 = 0;

  • If g mod 4 = 4;

  • If g div 4 = 1;

  1. Как записать на языке Pascal следующее условие: Как узнать количество полных лет в месяцах, где переменная m – количество месяцев, k – количество лет?

  • K:=m mod 12;

  • K:=m div 12;

  • K:=m / 12;

  • K:=Round(m/12);

  1. Чему равно значение Z при x=1 y=-1 после выполнения оператора if x>0 then if y>0 then z:=1 else z:=2;

  • -1

  • 2

  • 0

  • 1

  • -2

  1. Чему равно значение y после выполнения операторов? x:=1; y:=2; If x>=y then x:=-y else y:=-x;

  • -1

  • 2

  • 0

  • 1

  • -2

  1. В каком из операторов допущена синтаксическая ошибка:

  • Repeat y:=y+2 until y>10;

  • While w>=8 do d:=d+w;

  • If x:=1 then s:=s+1;

  • For n:=10 downto 5 do p:=p+1;

  1. Выберите логическую константу:

  • Else

  • Char

  • False

  • Then

  1. Выберите оператор множественного выбора:

  • If

  • For

  • While

  • Case

  1. Выберите символьный тип данных:

  • Char

  • CPL

  • Integer

  • String

  1. Какая функция относится к математическим?

  • SIN( x )

  • WRITE( x )

  • READ( x )

  • SQS( x)

  1. Какого типа могут быть элементы массива?

  • Вещественного

  • Целого

  • Символьного

  • всех типов выше перечисленных

  1. Необходимо в операторе REPEAT установить шаг цикла равным 3,укажите правильную запись:

  • i:=i+3*i

  • i:=i+2

  • i:=i+i+i

  • i:=i+3

  • i:=i+1

  1. результатом выполнения фрагмента алгоритма: a:=7; b:=8; k:=5+a; if a>b then k:=k*3 else k:=k-3; writeln (k); будет следующее значение k:

  • 8

  • 7

  • 9

  • 10

  1. Оператор в Паскале это:

  • человек, работающий в должности оператора ЭВМ

  • предложение языка программирования, задающее полное описание некоторого действия, которое может выполнить компьютер

  • знак действия: + - / * ^

  • команда ввода (вывода) информации: read или write

  1. Символ-разделитель операторов в Паскале:

  • точка

  • точка с запятой

  • запятая

  • пробел

  1. В каком месте программы может находиться оператор присваивания?

  • в начале строки

  • в любом месте программы, где синтаксис языка допускает наличие оператора

  • после служебного слова then в операторе условного перехода if

  • после оператора ввода информации read или readln

  1. Порядок выполнения оператора присваивания:

  • вначале вычисляется значение выражения в правой части оператора присваивания, а затем результат записывается (присваивается) переменной, идентификатор которой указан в левой части оператора

  • выполняются вычисления согласно принятому порядку дествий и с учетом наличия скобок

  • вначале вычисляются значения функций с учетом наличия скобок, а затем вычисления продолжаются согласно принятому в языке порядку действий

  • значение из одной ячейки памяти переписывается в другую ячейку

  1. Есть ли ошибка в использовании знака присвоения ":=" в представленном фрагменте программы: x:=100; if x=100 then y:=x*x;

  • неправильно использован знак присвоения ":=" в операторе "if x=100 then y:=x*x;" после слова if надо писать не "x=100", а "x:=100"

  • ошибки нет

  • в операторе "if x=100 then y:=x*x;" после then необходимо писать "y=x*x" вместо "y:=x*x"

  • затрудняюсь сказать