ПОМОГИТЕ написать программу которая выводит число , второе меньше вводимого х . pascal

Question

ПОМОГИТЕ написать программу которая выводит число , второе меньше вводимого х . pascal

Comments

Второе - это втрое (в три раза)?

Answer 1

Var x,y:real;
begin
write('x = ');
readln(x);
y:=x/3;
writeln('y = ',y);
end.

Пример:
x = 15
y = 5