Мало времени составить программу решения уравнения - вопрос №5123179 от Viktoriua25868 07.02.2023 11:08

Question

Информатика: Мало времени составить программу решения уравнения a*x+b=c pascal abc net проверьте у меня один

Viktoriua25868 · Answer

Требуется найти Х, поэтому перепишем уравнение так:
x=(c-b)/a. Теперь код программы может быть таким:

var a,b,c:real;
begin
writeln('Введите a,b,c');
readln(a,b,c);
if a<>0 then writeln('x = ', (c-b)/a)
else
writeln('деление на 0');
end.