Предмет: Информатика,
автор: skelpesinfo
Задания на фотографиях!!!
Приложения:
Ответы
Автор ответа:
1
var a, b, y: real;
begin
readln(a, b);
y := (x * x + a) / b;
writeln(y);
end.
Похожие вопросы
Предмет: Английский язык,
автор: katnast
Предмет: Русский язык,
автор: diana1685
Предмет: Русский язык,
автор: Аня160502
Предмет: Математика,
автор: фарик10
Предмет: Литература,
автор: osminkina04
Я сделал:
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.