Создайте программу на языке Паскаль, которая будет определять: является ли данная строка, введенная пользователем, палиндромом. ( ТИП ОБЯЗАТЕЛЬНО CHAR) и использовать функцию Length. Срочно пожалуйста!
program z1;vars:string; l:boolean;i,n :integer;beginwriteln ('vvedite stroku');readln (s);n:=length(s)div 2;for i:=1 to n do begin if s[i]=s[n+1] then l:=true else l:=false end;if l=true then writeln ('yes')else writeln ('no');end.