с ДЗ.
Pascal ABC
Задание на фото.

leshchenko1234 leshchenko1234    3   28.03.2020 17:38    0

Ответы
Fentis001 Fentis001  12.10.2020 08:01

var a,x,b: real;

begin

write('Введите a: ');

readln(a);

write('Введите b: ');

readln(b);

write('Введите x: ');

readln(x);

if (b <> 0) then  

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

else  

writeln('b не может быть равно 0!');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика