Выделите значения для переменных так, чтобы в программе отсутствовали ошибки, определяемые компилятором. Program test3; Var p: string; q: real; t: integer; d: char; k: boolean; Begin p:= ['128'/128/ 12.8 / true]; q:= [12.8/'128' / true]; t:= [128/'128'/ 12.8 / true]; d:= ['p'/128/12.8/q]; k:= [false/128/12.8/'12.8'];

Ответ:

Разбираемся:

1. p: string; - переменная строкового типа. Ей нужно присвоить строковое значение.
2. q: real; - переменная вещественного типа. Ей нужно присвоить число с плавающей точкой.
3. t: integer; - переменная целого типа. Ей нужно присвоить целое число.
4. d: char; - переменная символьного типа. Ей нужно присвоить один символ.
5. k: boolean; - переменная логического типа. Ей нужно присвоить значение true или false.

Присваиваем переменным корректные значения:

1. p := '128';
2. q := 12.8;
3. t := 128;
4. d := 'p';
5. k := false;

Ответ:

p := '128'; q := 12.8; t := 128; d := 'p'; k := false;