Составить алгоритм и программу для вычисления значения функции F по формулам:...

Question

Составить алгоритм и программу для вычисления значения функции F по формулам: sqrt(ab)/3(a+b)^2 - при a>0, b>0

Comments

pascal

Answer 1

Т.к. язык программирования не указан, сделаю на свой вкус, т.е. C++. При копировании кода из IDE на сайт автоматически удаляется перенос строки. Будет прикреплен скриншот того, как должен выглядеть код

#include #include #include #include
int main(){setlocale(LC_ALL, "RUSSIAN");float a, b, F;printf("\n Введите A >> ");scanf_s("%f", &a);printf("\n Введите B >> ");scanf_s("%f", &b);if ((a > 0) && (b > 0)) F = sqrt(a*b) / 3 * pow(a + b, 2);else{ printf("Ошибка. A<0 или B<0\n"); system("pause"); exit(0);}printf("F(a,b)=%f\n");system("pause");}<br>

---

Comments

На языке pascal возможно выполнение данной программы?

---

И все же было бы неплохо сразу в задании писать ЯП

---

program p1;
var a, b, F: real;
begin
writeln('Введите A >> ');
readln(a);
writeln('Введите b >> ');
readln(b);
if (a>0) and (b>0.0) then
begin
F:=sqrt(a*b)/3*sqr(a+b);
writeln('F(a,b)='+F);
end
else
writeln('Ошибка. A<0 или B<0');<br>end.

---

Спасибо большое