1.Напишите программу вычисления веса идеального мужчины по формуле: Ид.Вес-Рост в см -100 Значение роста вводится с клавиатуры. Результат вывести в следующем виде: Для мужчины ростом 165 см идеальный вес равен 65 кг. 2.По аналогии с заданием №1 составить программу, определяющую идеальный вес женщины по следующей формуле: Ид.Вес=Рост в см - 100 -10% (от Рост в см - 100)
A, b, i:integer; begin readln(a); b:=a-100; writeln('для мужчины ростом',a,'см идеальный вес равен',b,'кг'); readln; end. 2 то же самое, только b:=a-100-0,1a;