Решите уравнение y=(ad+bc)/bd с паскаля (программа для решения уравнения)

artemvershinin artemvershinin    1   16.04.2021 15:12    0

Ответы
Hiccjhcvkjxg Hiccjhcvkjxg  16.05.2021 15:16

Программа на PascalABC.NET:

var a, d, b, c: integer;

begin

writeln('Введите по очереди значения a, d, b, c: ');

readln(a, d, b, c);

if (b = 0) or (d = 0) then writeln('На 0 делить нельзя!')

else

writeln('y = ', (a*d + b*c) / (b*d))

end.


Решите уравнение y=(ad+bc)/bd с паскаля (программа для решения уравнения)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика