турбопаскаль или абс паскаль. Даны действительные числа a, b. Получить u = min(a, b-a), y = min(ab, a+b),
k = min(u+v2, 3.14).
Ответы
Ответ дал:
0
Если y - это на самом деле v, а v2 - неграмотная запись v², то программа может выглядеть так:
// PascalABC.NET 3.1, сборка 1179 от 29.02.2016
begin
var a,b:real;
Read(a,b);
var u:=Min(a,b-a);
var v:=Min(a*b,a+b);
var k:=Min(u+v*v,3.14);
Println(u,v,k)
end.
// PascalABC.NET 3.1, сборка 1179 от 29.02.2016
begin
var a,b:real;
Read(a,b);
var u:=Min(a,b-a);
var v:=Min(a*b,a+b);
var k:=Min(u+v*v,3.14);
Println(u,v,k)
end.
Вас заинтересует
1 год назад
1 год назад
8 лет назад
9 лет назад