В Pascal vara, b, c , z, x, g : real;beginreadln(a,b,c,z);g:=a+b ;x:=z+c ;if g>=x then begin if a >=b then writeln(a) else writeln(b); end; else begin if z>=c then writeln(z) else writeln(c) end;end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
