А < 7 значит проходим по алгоритму. мы к а:=а+1 (2+1); и b:=b+а (0+3 (3 потому что мы к а прибавили 1)). а < 7 значит проходим по алгоритму. мы к а:=а+1 (3+1); и b:=b+а (3+4). а < 7 значит проходим по алгоритму. мы к а:=а+1 (4+1); и b:=b+а (7+5). а < 7 значит проходим по алгоритму. мы к а:=а+1 (5+1); и b:=b+а (12+6). а < 7 значит проходим по алгоритму. мы к а:=а+1 (6+1); и b:=b+а (18+7). а уже не меньше 7 оно равно 7 значит мы вышли из цикла а=7 и b=25
Проверяем строку
Если там есть последовательность abc, то вставляем avbc или abvc.
То есть получаем 2 решения. Но если v=c, то решение только одно: avbc.
Причем нас интересует первая же последовательность.
Если в строке есть n строк abc, то по 1 решению на каждую.
Результат: n-1 взрывов.
Если в строке из n знаков нет последовательностей abc, но есть ab,
то последнюю с можно вставить куда угодно, кроме как после ab.
В этом случае будет n-1 решений.
Результат: 0 взрывов.
Program vs4;Var n,b,a,c:integer;Begin Writeln('Введите трехзначное число'); Readln(n); a:=n div 100; b:=(n div 10) mod 10; c:=(n mod 100) mod 10; n:=a+b+c; Writeln('Сумма цифр данного числа=',n);End.
1) Президент управляет страной
2) Письмо можно отправить
Используется 22 буквы и 10 цифр, всего 32 символа. Для кодирования каждого из 32 символов нам потребуется 5 бит (2⁵=32, от 00000 до 11111 как раз 32 варианта ).
для записи одного номера потребуется 6*5=30 бит
для записи 45 номеров необходимо 45*30=1350 бит