по заданным с клавиатуры значениям a, b найти значение F f=a+5 при b>2 а при b>2 паскаль
Приложения:

Ответы
Ответ дал:
0
function z00005(x, a, b : real; No1 {1, 2} : byte) : real;
var
f : real;
begin
if (No1 = 1) then
begin
if (b < 2) then
begin
f := a + 5;
end
else
begin
f := a;
end;
end
else
begin
if (b < a) then
begin
f := x * x;
end
else
begin
f := 8 * a * b;
end;
end;
z00005 := f;
end;
var
f : real;
begin
if (No1 = 1) then
begin
if (b < 2) then
begin
f := a + 5;
end
else
begin
f := a;
end;
end
else
begin
if (b < a) then
begin
f := x * x;
end
else
begin
f := 8 * a * b;
end;
end;
z00005 := f;
end;
Похожие вопросы
2 года назад
2 года назад
2 года назад
2 года назад
8 лет назад
9 лет назад