Информатика

Летта

13 мая, 03:03

Нельзя считывать данные этого типа паскаль (почему так выводится)

program crt;

var i: integer;

string: (s, b, d, a) ;

begin

writeln ('магистратура') ;

readln (a) ;

s:=copy (a, 4,7) ;

writeln (s) ;

d:=copy (a, 4,8) ;

writeln (d) ;

b:=copy (a, 4,8) ;

write (b) ;

end.