Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
программа на языке паскаль
program pr;
s: string;
begin
readln (s);
if length(s) mod 2=0 then writeln ('четное') else writeln('не четное');
readln;
end.
(12-3): (4+5)=1
1х2х3-4+5-6=1
(12: 3+4+5): (6+7)=1
(1+2-3+4+5+6-7): 8=1
Популярные вопросы