Question

Запиши верный ответ, если дан алгоритм: a1:=4/(13x) a2:=a1/x a3:=a2/x a4:=a3/x y:=a1+a4

Answer 1

Program Program1;
var a1,a2,a3,a4, x, y:real;
begin  writeln('Введите значение x');  readln(x);a1:=4/(13*x);a2:=a1/x;a3:=a2/x;a4:=a3/x;y:=a1+a4;writeln('Y= ',y);end.