Bвести предложение, состоящее из четного количества букв. Bывести на экран его первую половину. (программа Pascal) и ещё блок-схема(не обязательно, но желательно)
Нет комментариев
Ответы

Var
s: string;
begin
readln(s);
for var i := 1 to length(s) div 2 do
write(s[i]);
end.
3 комментария:
А что значит div? Обычно же пишут 1 to 2 do или как-то так)
Целочисленное деление.Можно было length(s) /2
Спасиб, спасиб)


