Громкость . Кость - вкусна для собак. Громкий - очень "громкий"
Один бит информации уменьшает неопределенность в два раза.
1)
var
a,b,c,d:real;
begin
readln(a,b,c);
d:=a;
a:=c;
c:=b;
b:=d;
writeln(a,' ',b,' ',c);
end.
<span>
2)
var
a,b,c:real;
begin
readln(a,b,c);
writeln(c,' ',a,' ',b);
end.<span>
</span>
</span>
Program ABC;uses crt;const a=168;b=175;c=169;Beginclrscr;if a=b then Beginif b=c then writeln(ludi odinakovogo rosta);end;else writeln(ludi ne odinaciovogo rosta);end;