Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
s : string;
a : integer;
begin
writeln('введите строку символов: '
readln (s);
a: = length(s);
if a mod 2= 0 then writeln ('четное') else writeln('не четное');
readln;
end.
1*2⁶+1*2⁵+0*2⁴+1*2³+0*2²+1*2¹+1*2⁰=
64+32+8+2+1=107
1*2⁶+0*2⁵+0*2⁴+0*2³+1*2²+1*2¹+0*2⁰=
64+4+2=70
напишите цель . то что у вас написано - полный бред. который после устранения синтаксических ошибок(а их тут не одна) работать не будет
7680*90=691200
691200/16=43200
43200/400=108 страниц
Популярные вопросы