Предмет: Информатика,
автор: lis2013
Срочно нужно! Очень прошу, заранее спасибо!
1. Написать программу, которая по введенному росту,
определит ваш идеальный вес. Если идеальный вес отличается от вашего, попросит
ввести ваш вес и выведет на экран
рекомендации по питанию и физическим нагрузкам.
Ответы
Автор ответа:
0
program chik;
var a,b,c:integer;
begin
writeln('РОСТ:');
read(a);
b:=a-110;
writeln('Ваш вес:');
read(c);
if(b<c)then writeln('ВАМ НЕОБХОДИМО ПОХУДЕТЬ!!!')else
if(b-c<10)then writeln('ВСЕ ХОРМ') else writeln('Необходимо набрат вес');
end.
var a,b,c:integer;
begin
writeln('РОСТ:');
read(a);
b:=a-110;
writeln('Ваш вес:');
read(c);
if(b<c)then writeln('ВАМ НЕОБХОДИМО ПОХУДЕТЬ!!!')else
if(b-c<10)then writeln('ВСЕ ХОРМ') else writeln('Необходимо набрат вес');
end.
Похожие вопросы
Предмет: Математика,
автор: yla8717
Предмет: Физика,
автор: ermekovakausar2
Предмет: Русский язык,
автор: izzatosmanov7
Предмет: История,
автор: pollymeier
Предмет: История,
автор: pollymeier