Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
рождения 30.05.95
300
программа на языке паскаль
program pr;
s: string;
begin
readln (s);
if length(s) mod 2=0 then writeln ('четное') else writeln('не четное');
readln;
end.
Популярные вопросы