Вычислить оптимальный вес пользователя, сравнить его с реальным и выдать рекомендацию

@vadim77 · Регистрация: 24.08.2010

Написать программу, которая вычисляет оптимальный вес пользователя, сравнивает его с реальным и выдает рекомендацию о необходимости попровиться или похудеть. Оптимальный вес вычисляется по формуле: рост(в сантиметрах) - 100.

@I2um1 · 11.10.2011, 17:54

Pascal

 var x, y : integer;
 begin
   write('Рост = '); readln(x);
   write('Вес = '); readln(y);
   if x - 100 > y then writeln('Поправиться!')
   else if x - 100 < y then writeln('Похудеть!')
   else writeln('Все ОК!')
 end.

@vadim77 1 / 1 / 0 Регистрация: 24.08.2010 Сообщений: 157
		1
	Вычислить оптимальный вес пользователя, сравнить его с реальным и выдать рекомендацию 11.10.2011, 15:19. Показов 1563. Ответов 1 Метки нет (Все метки) Написать программу, которая вычисляет оптимальный вес пользователя, сравнивает его с реальным и выдает рекомендацию о необходимости попровиться или похудеть. Оптимальный вес вычисляется по формуле: рост(в сантиметрах) - 100. __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

Вычислить оптимальный вес пользователя, сравнить его с реальным и выдать рекомендацию

Решение