Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1) неопределенность знаний n = 64 - 32 = 32;
2) i = log232 = 5 бит - количество информации;
3) количество бит соответствует количеству вопросов.
ответ: 5 вопросов.
1)
var a,b,c,d: real;
begin
read(a,b);
c: =(a+b)/2;
d: =2*a*b;
if a> b then begin
a: =d;
b: =c;
end;
if a< b then begin
a: =c;
b: =d;
writeln(a,' ',b);
end.
2)
var a,b: integer;
if (a< 1) or (a> 31) then writeln(' день введен неправильно');
if (b< 1) or (b> 12) then writeln(' месяц введен неправильно');
3)
var a,b,c: real;
read(a,b,c);
if (a> b)and(a> c)then writeln(a);
if (b> a)and(b> c)then writeln(b);
if (c> b)and(c> a)then writeln(c);
1)никакие художники не могут повторить замечательный стиль рисования известного художник маковского
2)все великие писатели в своё время переносили критику,но это делало их только сильнее.
дальше не придумал
(с уважением tipaeinstein)
var sum,n,i: integer;
readln(n);
sum: =0;
for i: =1 to n do
sum: =sum+i;
writeln(sum);
readln;
Популярные вопросы