Question

Program P80;
type Nume=packed array[1..8] of char;
Prenume=packed array[1..5] of char;
var N: Nume;
P: Prenume;
begin
N:='Munteanu';
P:='Mihai';
writeln(N);
writeln(P);
readln;
end.

Выдает ошибка в строке N:='Munteanu' нельзя преобразовать тип string к array [1..8] of char

Answer 1

Відповідь:

Program P80;

type

 Nume = packed array[1..8] of char;

 Prenume = packed array[1..5] of char;

var

 N: Nume;

 P: Prenume;

begin

 N := 'Munteanu';

 P := 'Mihai';

 writeln(N);

 writeln(P);

 readln;

end.