Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Объяснение:
0(7)0(6)1(5)0(4)1(3)0(2)1(1)1(0)
0*2(7)+0*2(6)+1*2(5)+0*2(4)+1*2(3)+0*2(2)+1*2(1)+1*2(0)=1*2(5)+1*2(3)+1*2(1)+1*2(0)=32+8+2+1=41
а)домащняя библиотека
в виде таблицы
1.номер
2.название
3.автор
4.полка
б)1.номер
2.слово
3.вопрос
4.род
5.число
6.падеж
в)1.номер
2.имя
3.фамилия
4.отчество
5.телефон
6.адрес
7.дата рождения
8.хобби
var
s: string;
z,z1,i: integer;
begin
readln(s);
z: =0;
z1: =0;
for i: =1 to length(s) do
if s[i]='м' then inc(z);
if s[i]='н' then inc(z1);
end;
if z> z1 then writeln('больше букв м');
if z< z1 then writeln('больше букв н');
if z=z1 then writeln('букв м и н равное количество');
end.
Популярные вопросы