Установите соответствие (с помощью стрелок) между переменной и типом данных:

а) A:=3.234 а) Integer

b) Z:=14 b) Real

c) B:=10351 c) Byte

d) K:=-0.2 d) Word

e) C: = 64000

1. Укажите размер типа Byte в байтах: A) 1; B) 2; C) 3; D) 4. 2. Какой из перечисленных типов является символьным типом данных? A) byte; B) char; C) boolean; D) integer. 3.

1. Переменная какого из перечисленных типов данных занимает наименьшее количество памяти? А. byte Б. word В. longint Г. integer 2. Какой из перечисленных типов данных является типом данных с плавающей запятой? А. word Б. real В. boolean Г. char 3.

Определить значение переменной у после выполнения следующих фрагментов программы: a) Var у : real; i : integer; у : = 1; i : = 5; while i> 2 do i: = i - 1; y:=y + 1 * i; b) Var у : real; i : integer; у : = 1; i : = 2; repeat i: = 2 * i;

Сократите эту программу program sr; var a, b, c : real; y, x, xb, xc : real; na, nb, nc: integer; function stup (x: real; n: integer) : real; var i: integer; k: real; begin k:=1; for i : = 1 to n do k : = k * x; stup : = k; end;

Program2. pas (29) : Нельзя преобразовать тип function (x: real; eps: real) : real к real var a, i, s, r, j, t, x, eps: real; function v (x, eps: real) : real; begin i : = 1; s : = 0; a : = 1; t : = 1; r : = 1;