Раздел Var

Раздел Begin… end

Раздел const

Раздел Uses

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

4 раза

5 раз

6 раз

1 раз

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

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

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;

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

5/3

15

5

240

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

25

2

0

23

-2

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

5

3

8

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

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

Двоеточием

Точкой

Запятой

Пробелом

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

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

//Текст

{Текст}

/ Текст /

<!-- Текст>

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

+

<>

div

or

not

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

LocalBet

Big gun

Mini_128_znach

B

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

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

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

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

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

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

Begin

Else

Then

End

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

A[1,3]

A(1,3)

A(1:3)

A[1..3]

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

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

Списка меток

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

Цикла

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

-1

-4

-3

5

3

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

writeln z;

writeln [‘z’];

writeln (z);

writeln ‘z’;

writeln (‘z’);

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

3

4

5

6

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

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

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

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

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

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

12

13

14

15

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

25

256

2

2564

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

10

8

9

4

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

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

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

десять цифр

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

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

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

Label

Button

StringGrid

CheckBox

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

Label

Edit

MessageBox

Edic

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

Label

Edit

Memo

Nemo

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

Button

Burton

Batton

Barron

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

Prospecties

Properties

Events

Caption

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

Edit

Button

Label

Memo

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Round(x)

Frac(x)

Trunc(x)

Int(x)

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

Round(x)

Frac(x)

Trunc(x)

Int(x)

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

Round(x)

Frac(x)

Trunc(x)

Int(x)

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

Round(x)

Frac(x)

Trunc(x)

Int(x)

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

SnowMessage

ShowMesage

Show_Mesage

ShowMessage

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

Text

Memo

Caption

Information

Как правильно вывести значение целочисленной переменной 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);