Вычислить оптимальный вес для пользователя

@f1z1k · Регистрация: 23.07.2015

Студворк — интернет-сервис помощи студентам

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

@klast · 27.04.2012, 21:41

Pascal

var
  rost, ves: integer;
 
begin
  write('Введите рост: ');readln(rost);
  write('Введите вес: ');readln(ves);
  if rost - 100 > ves then writeln('ешь больше');
  if rost - 100 = ves then writeln('ты идеален :D');
  if rost - 100 < ves then writeln('ешь меньше');
end.

@f1z1k 0 / 0 / 0 Регистрация: 23.07.2015 Сообщений: 3
		1
	Вычислить оптимальный вес для пользователя 27.04.2012, 19:04. Показов 5752. Ответов 1 Метки нет (Все метки) Задание:Написать программу,который вычисляет оптимальный вес для пользователя,сравнивает его с реальным и выдает рекомендацию о необходимости поправиться или похудеть.Оптимальный вес вычисляется по формуле:Рост(см)-100=Вес(кг). 0

	27.04.2012, 21:41

Опции темы

Вычислить оптимальный вес для пользователя

Решение