Составить алгоритм решения с алгоритмического языка - вопрос №1262279 от helissieble 22.10.2022 08:24

Question

Информатика: Составить алгоритм решения с алгоритмического языка pascal и с блок-схем, используя конструкцию алгоритма с ветвлением. написать алгоритм решения , которая решает уравнение ax + b = 0 относительно x для любых чисел a и b, введенных с клавиатуры. все числа считаются действительными.

helissieble · Answer

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.

сорри за то что все в куче