Помогите 2 пожалуйста)))

Question

Помогите 2 пожалуйста)))

---

Answer 1

Вот, к примеру на Паскале

var le:integer;
begin
read(le);
write('Идеальный вес = ', le - 100);
end.