Ребята, кто шарит в информатике пожалуйста помогите.. СРОЧНОНужно разработать программу в...

Question

Ребята, кто шарит в информатике пожалуйста помогите.. СРОЧНО
Нужно разработать программу в Pascal для решения уравнения вида
{a}^{x} = bax=b
нужно составить математическую модель, блок-схему и программу
пожалуйста хелп

Answer 1

Показательное уравнение решается логарифмом, линейное - делением

x=ln (b)/ln (a) первый случай
x=b/a второй случай

program test;
uses crt;
var a, b,x: real;

begin
clrscr;
repeat
readln ('Введите значение коэффициентов ',a,b)
until a>0 and b>0;
x:=ln (b)/ln (a);
writeln ('решение показательного уравнения ',x);
x:=b/a;
writeln ('решение линейного уравнения ',x);
readkey;
end.