помогите пож-ста 92 задачу
5-9 класс
|
Program ves;
var r:integer;idv,v:real;
begin
write('Введите ваш рост и вес');readln(r,v);
idv:=(r-100);
writeln('Ваш идеальный вес должен быть ',idv,' кг');
if v<idv then write('Вам нужно поправиться на ',abs(v-idv),' кг') else
if v=idv then write('Вы в хорошей форме') else
write('Вам нужно похудеть на ',abs(v-idv),' кг');
end.
Другие вопросы из категории
документу вам известны??
убков в корзине?
скопировали её во все ячейки диапазона F2:F11, кроме одной, таким образом, что содержимое ячейки Н1 стало равно 50. В какую ячейку НЕ скопировали формулу?
А)F11 Б)F2 В(F6 Г)F8
Читайте также
. Пользователь работал с каталогом Школа. Сначала он поднялся на один уровень вверх, затем ещё раз поднялся на один уровень вверх, а потом спустился на один уровень вниз. В результате он оказался в каталоге С:\Катя\Информатика.
ИНФОРМАТИКА НЕ ПОНИМАЮ ЕЕ ПОМОГИТЕ ПОЖАЛУЙСТА ЗАВТРА РЕШЕНИЕ ЗАДАЧ НАДО!!!! ((((((((((((((((Какой обьем имеет графический файл в расширении 400 на 600?
Книга состоит из 500 листов, на одной странице 40 строк в каждой строке 60 символов сколько таких книг поместится на сиди диске обьемом 700 мб?Сколько книг емкостью 350 кб поместится на дискете емкостью одна целая 44 мб?