Срочно нужно! Очень прошу, заранее спасибо!1. Написать программу, которая по введенному...

Question

Срочно нужно! Очень прошу, заранее спасибо!
1. Написать программу, которая по введенному росту,
определит ваш идеальный вес. Если идеальный вес отличается от вашего, попросит
ввести ваш вес и выведет на экран
рекомендации по питанию и физическим нагрузкам.

Answer 1

Смотрите во вложении.........................................

---

Answer 2

Program chik;
var a,b,c:integer;
begin
writeln('РОСТ:');
read(a);
b:=a-110;
writeln('Ваш вес:');
read(c);
if(bif(b-c<10)then writeln('ВСЕ ХОРМ') else writeln('Необходимо набрат вес'); <br>end.

Comments

идеальный вес=рост-110(у женшин) а у мужиков -100