Предмет: Информатика,
автор: skelpesinfo
Задания на фотографиях!!!
Приложения:


Ответы
Автор ответа:
1
var a, b, y: real;
begin
readln(a, b);
y := (x * x + a) / b;
writeln(y);
end.
Интересные вопросы
Предмет: Русский язык,
автор: nikolaeva84
Предмет: Русский язык,
автор: аветис
Предмет: Қазақ тiлi,
автор: ИГООРЬЬ
Предмет: Алгебра,
автор: angelinapetrova2002
Предмет: Обществознание,
автор: kuzma2016
Я сделал:
Program homework1;
var
a, b, x, y: real;
begin
writeln('Введите значение x');
read(x);
writeln('Введите значение a');
read(a);
writeln('Введите значение b');
read(b);
y:=(x*x+a)/b;
writeln('Ответ равен: ', y);
end.