Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
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);
ответ 2)
мальчики плывут на тот берег
один возвращается
мама плывет на тот берег
второй мальчик возвращается
два мальчика плывут на тот берег
отец плывет на тот берег
заяц или
Популярные вопросы