Имеется описание: TYPE Anketa = RECORD
Fio, Adress : STRING[50];
Group : STRING[6];
Kurs : 1..5;
END;
VAR : Student : Anketa;
Правильные операторы присваивания:
(*ответ*) Student.Fio := ’Иванов П.А.’
(*ответ*) Student.Kurs := 2;
Kurs.Student := 3;
Fio.Student := ’Кузнецов И.В.’;
Anketa. Group := ‘ОИ-306’;
Anketa. Kurs :=4;
Имеется описание: TYPE Anketa = RECORD
Fio, Adress : STRING[50];
Group : STRING[6];
Kurs : 1..5;
END;
VAR : Student : Anketa;
В результате выполнения оператора : Student.Kurs := ‘5’ возникнет ошибка, так как
(*ответ*) смешаны типы переменных
неправильно записано имя компоненты записи
неверно определен записной тип
к компоненте записи нельзя обращаться в операторе присваивания
Имеется описание: TYPE Anketa = RECORD
Fio, Adress : STRING[50];
Group : STRING[6];
Kurs : 1..5;
END;
VAR : Student : Anketa
Правильные операторы вывода – это
(*ответ*) WITH Student DO BEGIN WRITELN(Fio); WRITELN(Group) END;
(*ответ*) WRITELN(Student.Fio); WRITELN(Student.Group);
WRITELN(Fio); WRITELN(Group);
WRITELN(Anketa.Fio); WRITELN(Anketa.Group);
Имеется описание: TYPE List = RECORD
n : INTEGER;
fio, adres : STRING[50];
group : STRING[6];
END;
VAR Anketa : List;
Переменная Anketa имеет _ поля (количество полей введите цифрами)
(*ответ*) 4
Имеется фрагмент программы:
a^:=10; b^:=20; a := b;
if a^ =b^ then Writeln(a^) else Writeln (5);
В результате выполнения данного фрагмента на экран будут выведен
(*ответ*) число 20
число 10
числа 5
сообщение об ошибке
Какое значение получит переменная Z после выполнения операции присваивания
Z:=A div X , при A=7, X=3
(*ответ*) 2
1
3
0
Какое значение получит переменная Z после выполнения операции присваивания
Z:=A mod X , при A=7, X=3
(*ответ*) 1
2
3
0
Количество повторений цикла: for i := 10 to 1 do p := p + 1;
равно _ (ответ введите цифрами)
(*ответ*) 0
Количество повторений цикла: for i := 5 downto 1 do p := p + 1;
равно _ (ответ введите цифрами)
(*ответ*) 5
Объявлены переменные файлового типа:
Type Sklad = Record
Name : String [30];
Num : String [10];
Count : Integer;
End;
Var f1 : File Of Sklad; f2 : Text; f3 : File; f4 : File Of Integer;
Типизированными файлами являются:
(*ответ*) f1
(*ответ*) f4
f2
f3
Переменная ar, описанная как
Var ar: array [1..10] of integer
является переменной типа
(*ответ*) массив
диапазон
перечисляемый
множество
Переменная D, описанная как
Type = (mon, tues, wed, thur, fri, sat, sun,)
Var D: Days
является переменной типа
(*ответ*) перечисляемый
диапазон
ссылочный
множество