Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
пишу сразу двоичный код
1)5,5
2)8,8
3)9,8
4)11,6
5)12,6
6)12,7
7) 11,7
8)11,2
9)9,2
10)9,3
11)10,3
12)10,4
13)7,4
14)7,2
15)5,2
16)5,3
17)6,3
18)6,9
19)7,9
20)7,8
21)2,8
22)2,9
23)3,9
24)3,6
25) 4,5
пщояк 17 27 16 33 17
нщёп 15 27 7 17
1)
var
a,b,x,y: real;
begin
readln(a,b);
x: =(a+b)/2;
y: =2*a*b;
if a> b then
a: =y;
b: =x;
end
else
a: =x;
b: =y;
end;
writeln('a=',a: 8: 3);
writeln('b=',b: 8: 3);
end.
2)
d,m: integer;
readln(d,m);
if (d< 1) or (d> 31) then writeln ('день введен неверно');
if (m< 1) or (m> 12) then writeln ('месяц введен неверно');
3)
a,b,c: integer;
readln(a,b,c);
if (a> b) and (a> c) then writeln(a);
if (b> a) and (b> c) then writeln(b);
if (c> a) and (c> b) then writeln(c);
Популярные вопросы