Помогите решить задачу на языке паскаля Написать программу для определения того, находится ли вес человека в пределах нормы Для определения нормального веса человекс из величины его роста вычитают 100. Вес считается нормальным ...

Program xxx; var rost,ves,resultat:real; begin Writeln('Добро пожаловать в калькулятор веса.'); Write('Введите ваш вес:'); read(ves); Write('Введите ваш рост:'); read(rost);resultat:=rost-100; Write('Итог: Ваш вес: ' ,ves); Writeln('Ваш рост: ' ,rost); Write('Ваш нормальный вес(+-5):' ,resultat); end.