Составить алгоритм решения задачи с помощью алгоритмического языка Pascal и с помощью блок-схем, используя конструкцию алгоритма с ветвлением.
Написать алгоритм решения задачи, которая решает уравнение ax + b = 0 относительно x для любых чисел a и b, введенных с клавиатуры. Все числа считаются действительными.
program qq;
uses crt;
var a,x,b:real;
begin
crlscr;
writeln(введите а и b );
readn(a,b);
if a=0 then
if b=0 then writeln(x любое число)
else writeln(решений нет )
else begin
x:=(-b/a);
writeln (x);
end;
readln
end.
сорри за то что все в куче
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
