Контрольная работа №1 Вариант № 8 по информатике за 1-й семестр

1. Выполнил

2. Город

3. Код доступа –

Пароль -

1. Составить ответы по контрольным вопросам, заданным в методическом пособии.

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

POINTER

2. Какие типы в языке PASKAL относится к порядковым типом?

ShortInt, Integer, LongInt, Byte, Word.

3. Чем отличается символьный тип от строкового типа?

Переменная типа String состоит из цепочки символов т.е. элементов типа Char.

Char-представляет собой тип данных предназначенный для хранения одного символа. В переменную этого типа на компьютере IBM PC может быть помещен любой из 256 символов расширенного кода ASKII.

4. Назвать диапазоны допустимых значений для целых и вещественных типов данных?

Целочисленные типы данных:

Byte 0..255

Word 0..65535

Integer -32768.. +32767

Shortin -128.. +127

Longint -2147483648.. +2147483647

Вещественные типы:

Real 2.9E-39 …1.7E38

Single 1.5E-45 …3.4E38

Double 5.0E-324 …1.7E308

Extended 3.4E-4932 …1.1E4932

Comp 9.2E-18 …9.2E18

5. Какие операторы можно использовать с логическим (BOOLEAN) типом, какие операторы возвращают значение логического типа?

Условие if then

Repeat, untill, while

6. Как объявляются перечислимые типы данных?

Var имя переменной: перечисляемый тип данных

7. Какое максимальное число элементов перечислимого типа?

LongInt-2147483648..2147483647 занимает 4 байта. Число переменной ограничено оперативной памятью. Оперативная память 64 кБ.

8. Привести пример ограниченного типа данных?

Const

Min=1;

Max=100;

Type

Temperature=1100

Var t: temperature;

…………………

t:=45;

t:=125; (ошибка – выход из диапазона)

9. Можно ли в качестве элементов ограниченного типа использовать вещественнее числа?

Нет нельзя

10. Какова максимально возможная длинна строки и какова длинна строки по умолчанию (без ее явного объявления)?

Мах длинна строки 255 символов

Строки с завершающим нулем не содержат байта длинны. В отличие от обычных строк, они состоят из последовательности нулевых символов, за которыми следует символ NULL (#0). Ограничение накладывается, на 16-разрядную архитектуру DOS и равно 65535 символов.

11. Каков порядок выполнения арифметических операций?

Not, *, /, div, mod, +, -, =, <>, <, >, <=, >=, in

12. Каков порядок выполнения логических операций?

And, shl, shr, or, xor,

13. Какой тип операндов у операций отношения и у логических операций?

Boolean

14. Какого типа переменные Z и Y в программе, содержащей строку: IF Z THEN Y:=A=B и что будет происходить при выполнении этой строки программы?

Boolean (логический)

Если Z=True тогда выполняет действие

Если A и B равны тогда Y присваивает True

Если A не равно B = false

15. Переменные какого типа можно использовать в качестве параметров цикла FOR..TO..DO?

Перечисляемого типа

16. В чем отличие циклов WHILE..DO И REPEAT..UNTIL?

1.В конструкции While do проверку условия выхода выполняется в начале, а не в конце цикла поэтому если не удовлетворяется до начала выполнения цикла то тело цикла игнорируется и выполняется оператор стоящий сразу же после окончания тела цикла.

2.В конце While do условие выхода происходит если выражение определяющее условие выхода FALSE а в конструкции Repeat Untill если это выражение True.

3.Между зарезервированными словами Repeat Until может размещаться несколько действий в то время как в конструкции While do может содержаться максимум одно действие.

17. В каких операторах цикла допускается изменять параметр цикла, а в каких нет?

В перечисляемом цикле FOR TO DO изменение параметров цикла не допускается.

А в цикле с пред условием While do и пост условием Repeat Until изменение параметров цикла допускается.

18. Определение массива?

Массивы - это структурированный тип данных, состоящий из фиксированного числа элементов, имеющих один и тот же тип и обозначенных общим идентификатором. Число элементов массива фиксируется при описании и в процессе выполнения программы не меняется. Для описания массива используется слово ARRAY.

19. Переменные какого типа можно использовать в качестве индексов?

1. Перечисляемые.

2. Константные.

20. Какие объекты (переменные выражения и т.д.) можно использовать в качестве индексов массивов?

Индекс можно задавать непосредственно значением, константой, переменной, выражением и функцией, главное условие только чтобы все они мели целочисленное значение, не превосходящее диапазон изменения индекса заданного массива.

21. какова структура программы?

[Program <имя программы>]

[Const

Описание константы]

[Type

Описание пользовательских типов]

[Var

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

Begin

Тело программы (или раздел исполняемых операторов)

End.

22. Для чего используется составной оператор?

Составной оператор воспринимается как единое целое и обычно используется в качестве составной части других операторов, где требуется применение нескольких операторов вместо одного (обычно операторы IF, FOR, WHILE и д.р.). для облегчения чтения программы рекомендуется располагать Begin и End на одной позиции программы.

23. Для чего используется операторы цикла и логический (условный) оператор?

Операторы повтора (или операторы цикла) используются для организации циклов различных типов. т.е. для повторения однотипных действий. Используются для соблюдения некоторых условий, для того чтобы при определение условий выполнялись те или иные действия.

2. перевести числа 1234 и 4321 в двоичный и шестнадцатеричный вид?

Число 1234 в двоичной системе: 10011010010

Число 1234 в шестнадцатеричной системе: 4D2

Число 4321 в двоичной системе: 1000011100001

Число 4321 в шестнадцатеричной системе: 10E1

3. Составить программу, в которой с помощью оператора WHILE подсчитать сумму ряда?

до тех пор пока член ряда не будет меньше?

Программа:

Uses crt;

Var i:word;

y,x:real;

begin

clrscr;

i:=5; x:=0; y:=10;

while y>0.005 do

begin

y:=5/(i+10);

x:=x+y;

inc(i);

end;

writeln(‘Член ряда менее ’,y:2:3);

writeln(‘Сумма ряда равна ’,x:2:5);

readln;

end.

4. Составить программу, в которой с помощью оператора WHILE организовать цикл, в котором значения параметра t менялись от 0,5 до 5 с шагом h=0.1. Вывести на экран значения t и функции?

program zad_4;

uses crt;

var t,y:real;

begin

textmode(3+256);

clrscr;

t:=0.5;

while t<=3 do

begin

y:=sin(t);

writeln(‘Значение t= ’,t:1:1,’ значение функции sin(t)= ’,y:2:5);

t:=t+0.1;

delay(10000);

end;

writeln;

while t<=5 do

begin

y:=arctan(t-3);

writeln(‘Значение t=’,t:1:1,’Значение функции tg(t-3)=’,y:2:5);

t:=t+0.1;

delay(10000);

end;

readln;

end.

5. Составить программу, в которой с помощью оператора FOR подсчитать сумму ряда?

Program zad_5

Uses CRT;

Var i: word;

Sum: real;

Begin

Clrscr;

For i:=12 to 100 do

Begin

Sum: =sum + (sqr (i)-1/i);

End;

Writeln (‘Сумма ряда равна’, sum : 1 : 5);

End.

6. Составить программу, в которой с помощью оператора WHILE протабулировать функцию y=2*x+0.33 в диапазоне параметра от 1 до 5 с шагом 0,25.

Program zad_6;

Var x,y:real;

Begin

X:=1;

Repeat

Y:=2*x+0.33;

X:=x+0.25;

Writeln(‘y=’,y:2:2);

Until x=5;

Readln;

End.

7. Составить программу, в которой составить массив C[1..100] из псевдослучайных символов из диапазона CHR(65)-CHR(90) и определить количество символов ‘A’,’B’,’C’ и ‘D’.

Program zad_7;

Var i: integer;

Mas: a, b, c, d Array [1..100] of char;

Begin

Randomize;

For i: =1 to 100 do

Begin

Mas [i]: =chr (random (25) + 65);

End;

a:=0; b:=0; c:=0; d:=0;

For i: =1 to 100 do

Begin

If mas[i]=’A’ then inc(a);

If mas[i]=’B’ then inc(b);

If mas[i] =’C’ then Inc(c);

If mas[i] =’D’ then Inc (d);

End;

Writeln(‘Символ А в массиве ’,a);

Writeln(‘Символ B в массиве ’,b);

Writeln(‘Символ C в массиве ’,c);

Writeln(‘Символ D в массиве ’,d);

Readln;

End.

8. Составить программу, в которой сформировать двумерный целочисленный массив C[1..30,1..30] из случайных целых чисел и определить количество элементов массива, значения которых больше 20.

Program zad_8;

Var a, j, i:integer;

Mas: array [1..30,1..30] of integer;

Begin

Randomize;

For i: =1 to 30 do

Begin

For j:=1 to 30 do

Mas[i][j]:=random(100);

End;

a:=0;

for i:=1 to 30 do

begin

for j:=1 to 30 do

if mas[i][j]>20 then inc(a);

end;

writeln(‘элементов в массиве значение которых больше 20=’,a);

readln;

end.