Имеется описание:
Type TPerson = Object
Name : String [25];
Rate : String [25];
Procedure Init (Nm, Rt : String);
End;
Var APerson : TPerson;
Впишите пропущенное слово в описание процедуры (прописными буквами).
Procedure _. init;
Begin
Name := Nm; Rate := Rt;
End;
(*ответ*) tperson
Имеется описание:
Type TPerson = Object
Name : String [25];
Rate : String [25];
Procedure Init (Nm, Rt : String);
End;
Var APerson : TPerson;
Впишите пропущенное слово в обращение к процедуре Init (прописными буквами)
_.Init (AStr, BStr)
(*ответ*) aperson
Имеется описание
Var P1,P2:^Integer;
P3 : ^Real; PP : Pointer;
Разрешены присваивания:
(*ответ*) P1 := P2
(*ответ*) P1 := PP
(*ответ*) P3 := PP
(*ответ*) PP := P2
P1 := P3
P3 := P2
Имеется фрагмент программы:
a^:=10; b^:=21; a := b;
Writeln(a^,' ',b^);
В результате выполнения данного фрагмента на экран будут выведены(о)
(*ответ*) числа 21 21
числа 10 10
числа 10 21
сообщение об ошибке
Имеется фрагмент программы:
b := 777; p := @b; p1 := p;
p1^ := 999; Writeln( b );
b имеет тип Integer, p и p1 имеют тип ^Integer. В результате выполнения данного фрагмента на экран будет выведено(ен)
(*ответ*) число 999
число 777
сообщение об ошибке
адрес ячейки памяти, выделенной для b
Имеется фрагмент программы:
N := 17; AddrN := @N
N имеет тип Integer, AddrN имеет тип ^Integer.
Верны следующие утверждения:
(*ответ*) Оператор Writeln(AddrN^); выведет на экран число 17
(*ответ*) В результате выполнения оператора Writeln(AddrN); будет выведено сообщение об ошибке
Оператор Writeln(AddrN^); выведет на экран адрес ячейки памяти, выделенной для N
Оператор Writeln(AddrN); выведет адрес ячейки памяти, выделенной для AddrN
Имеется фрагмент программы:
p^:=7; p1^:=8; p := p1;
dispose(p); dispose(p1);
Writeln(p^,' ',p1^);
В результате выполнения данного фрагмента на экран будет(ут) выведено(ы)
(*ответ*) сообщение об ошибке
числа 8 8
числа 7 7
числа 7 8
Описана ссылка: Var a : Real;
В операторе присваивания a_ := 2.45; (впишите недостающий значок)
(*ответ*) ^
Пусть имеется объявление:
Var Ptr, p1 : ^integer;
S_ptr : ^string;
p : pointer;
В этом случае разрешены операторы присваивания:
(*ответ*) Ptr := p1
(*ответ*) p1 := Ptr
(*ответ*) p1 := p
(*ответ*) p := Ptr
(*ответ*) S_ptr:= p
(*ответ*) p := S_ptr
Ptr := S_ptr
S_ptr := p1