На языке Pascal:
var a, b, c:integer;
begin
readln(a, b, c);
if (a<b) then begin
if (a<c) then
writeln(a);
end
else if (b<c) then
writeln(b)
else
writeln(c);
end.<span>
</span>
Тело цикла будет выполнено 31 раз. Следовательно переменная s станет равна 93
<span>это новая строка. т.е</span>
Условие не дописано, но в таких случая обычно требуется найти информационный объем сообщения. Получается так:
8 бит на один символ, значит всего получим 100*8 = 800 бит или 100 байт
8
1)г,б,а,в
2)б,в,а,г
3)г,в,б,а
4)в,б,а,г
5)г,а,б,в
Я написала порядок букв например
г-мопсы пудели и тж