Пусть имеется описание переменных
Type q = array [1..20] Of Char; z = Record x, y : Char End;
Var x, y : ^Char; a, b : ^ q; c : ^z; p : Pointer;
справедливы операторы присваивания
(*ответ*) x := y
(*ответ*) x := p
(*ответ*) p :=c
(*ответ*) a := p
x := c
y := z
Пусть имеется описание
Type Dim = Array [1..100, 1..2] of Real;
Zap = Record x, y : Byte; a : Dim; End;
Df = File Of Dim; Zf = File Of Zap;
ff1 = File Of File Of Real; ff2 = File Of Df;
f = File Of String;
Допустимыми объявлениями файлового типа являются:
(*ответ*) Df
(*ответ*) Zf
(*ответ*) f
ff1
ff2
Пусть имеется описание
Type Pint = ^Integer; W = array [1..20] of Real; p = ^W;
Var
N : Pint; U : p; G : ^array [1..5] Of Char; B : ^Boolean;
Правильно описаны ссылочные переменные
(*ответ*) N
(*ответ*) G
(*ответ*) U
(*ответ*) B
Pint
W
p
Пусть имеется следующее описание переменных
Var a, b : Real; SS : Record x, y : Real End; Ar : array [1..5] Of Char;
Укажите операторы вывода в текстовый файл, записанные верно.
(*ответ*) Writeln (f, a : 8 : 3, ‘S=‘, b : 4 : 2)
(*ответ*) Writeln (f, Ar [1], Ar [2], SS.x, SS.y)
(*ответ*) Writeln (f, Ar [1], Ar [2], Ar [3], Ar [4], Ar [5])
Writeln (f, a, b, SS, Ar)
Write( 20, a )
Write(f, 20, SS)
Пусть имеется следующее описание:
Var a, b: ^Real;
Для переменных a и b справедливы операторы
(*ответ*) a^ := Sin( b^)
(*ответ*) a :=b
(*ответ*) New( a )
New (a^)
a := a / b
a^ := a^ mod b^
Пусть имеются описания
Type Dim = Array [1..100] of Real
Zap = Record X, Y: Byte; a:Dim; End;
Допустимы следующие объявления:
(*ответ*) Df = File Of Dim
(*ответ*) Zf = File Of Zap
(*ответ*) ff1 = File Of Real
ff2 = File Of File Of Real
ff3 = File Of File Of Zap
Пусть объявлены переменные файлового типа:
Type Sklad = Record
Num : String [10];
Count : Integer;
End;
Var f1 : File Of Sklad; f2 : Text; f3 : File; f4 : File Of Integer; f5 : File Of Char;
Типизированными файлами являются:
(*ответ*) f1
(*ответ*) f4
(*ответ*) f5
f2
f3