Напишите программу вычисления идеального веса человека по формуле: Идеальный вес = Рост в см - 100. Значение роста вводится с клавиатуры. Результат вывести в следующем виде:.

Question

Дария

12 сентября, 11:16

+1

Ответы (1)

Знаете ответ?

Мариня · Answer 1

Var r, ves:integer;

begin

read (r) ;

ves:=r-100;

writeln ('Для человека ростом ', r,'см идеальный вес равен ', ves,' кг') ;

end.