Ну, для начала определим, сколько битов в одном символе
Значит, 5 бит/символ
В первых символах по 2 бита, ибо
, а символа как раз 4
Итого,
бит в слове из 8-ми букв
В задании не указано, чем разделены группы в строке. Поэтому принято, что группа состоит из нулей и единиц, а разделителями групп может быть любое количество любых иных символов. Если это не так, просто вводите те символы-разделитеоли, каккие считаете нужными.
// PascalABC.NET 3.4.2, сборка 1790 от 15.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadlnString('Вводите:').MatchValues('[01]+')
.Where(s->s.Length.IsOdd).ToArray;
var b:=a.Select(w->w.ToCharArray.Where(c->c='1').Count).ToArray;
a.Zip(b,(p,q)->p+' - '+q).PrintLines
end.
Var a,b,c:integer;
begin
writeln('a=');
readln(a);
writeln('b=');
readln(b);
writeln('c=');
readln(c);
if (a+b>c) and (b+c>a) and (a+c>b) then writeln('treugolinik suscestvuet ;) else writeln('treugolinik ne suscestvuet');
readln;
end.
Действие с повторением называются Циклы.
Примером цикла из жизни может послужить анекдот:
Программист решил помыть голову шампунем
Читает инструкцию
1. Нанести шампунь
2. Намылить
3. Смыть
4. Процедуру повторить
Ну и он зациклился.
2748+77=<span>2825 - десятичная
101010111100+1001101=</span><span>2825 - двоичная
</span>