Сколько операций умножения будет произведено при выполнении этого цикла, если k = 10?

for i:= 2*k to 5*k do a:= a*2

Сколько операций сложения будет произведено при выполнении этого цикла, если k = 10?

for i:= k to k+10 do a:= a+2

Какой тип будет иметь результат выражения a+b при a:byte, b:shortint?

Какие значения будет принимать переменная z, в зависимости от значений переменной а?

z:= 0;if a>10   then if a>100         then if a>1000                then z:= 1         else z:= -1  else z:= 10;

Какие значения будет принимать переменная z, в зависимости от значений переменной а?

z:= -1;if a<100  then if a<10         then if a<1                then z:=0         else z:= 10  else z:= 100;

Какие значения будет принимать переменная z, в зависимости от значений переменной а?

z:= -10;if a>0   then if a>100         then if a>200                then z:=0         else z:= 20  else z:=100;

Какие значения будут храниться в переменных s и k после считывания из текстового файла f строки 'Петров Петр Петрович 1956' при помощи команды

readln(f,s,k); {s: string[22], k:shortint =0}

Какие значения будут храниться в переменных s и k после считывания из текстового файла f строки 'Олегов Олег Олегович 1962' при помощи команды

readln(f,s,k); {s: string[22], k:byte =0}

Какие значения будут храниться в переменных s и k после считывания из текстового файла f строки 'Иванов Иван Иванович 1945' при помощи команды

readln(f,s,k); {s: string[22], k:byte =0}

Какое значение будет храниться в поле a записи r1 после выполнения следующего блока?

var a: integer;    r1: record a: byte;               ...        end;    r2: record a: shortint;               ...        end;begin a:= 0; with r1 do   begin   r2.a:= -10;   with r2 do    begin a:= 100;          r1.a:= -a;    end  end; a:= 100;end.

Какое значение будет храниться в переменной а:integer после выполнения следующего программного отрывка?

{b: string; p: ^word}b:= ‘ААББВВГГДД’;p:= addr(b[7]);a:= p^;