Программа, в которой с клавиатуры вводится слово, состоящее из чётного количества букв. Надо вывести на экран первую половину слова.

1

Ответы и объяснения

2011-12-09T17:30:30+04:00

var

 s:string;

 i:longint;

begin

 readln(s);

for i:=1 to length(s) div 2 do write(s[i]);

end.