Вычислить значение функции y=a/x+b при x=1, 2, 3, 10 (a, b вводятся с клавиатуры)

Question

Вычислить значение функции y=a/x+b при x=1, 2, 3, 10 (a, b вводятся с клавиатуры)

Comments

х=1,2,3,10 или все же 1,2,3,...10 ?

---

И еще - Вы язык программирования не указали.

Answer 1

Var a,b,x:integer;
begin
writeln('Введите A, B');
read(a,b);
for x := 1 to 10 do
writeln('Для x=',x,', y=',a/x+b);
end.

Answer 2

Программа на языке Pascal 3.0
program Z_1;
uses crt;
var a,x,b:integer;
      y:real;
begin
writeln('Введите a,b,x'); readln(a,b,x);{x тоже нужно ввести, так как нет никакой последовательности в этих четырех цифрах и циклом не получится}
y:=a/(x+b);
writeln(y);
end.

Comments

1) Что это за язык Pascal 3.0 ? 2) В здании сказано, что с клавиатуры вводятся a,b. 3) Программа вычисляет у только для одного значения х