УМОЛЯЮ,ПОМОГИТЕ С ПАСКАЛЕМ
10-11 класс
|
1)
Вычислить оптимальный вес по формуле рост-100 (фактический вес V и рост H вводятся пользователем) и выдать одно из сообщений:
- у вас идеальный вес;
- вам нужно похудеть на n кг (n вывести);
- вам нужно поправиться на n кг (n вывести).
2)Составить программу, которая бы по последней цифре многозначного числа выдавала бы одно из сообщений:
число не делится ни на 2, ни на 5
число делится только на 2
число делится только на 5
число делится и на 2, и на 5.
1)
var v,h,i:real;
begin
readln(v);
readln(h);
i:=h-100;
if v=i then writeln('у вас идеальный вес') else
if v>i then writeln('вам нужно похудеть на ', v-i,' кг ') else
writeln('вам нужно поправиться на ', i-v,' кг ');
end.
2)
Комментарий удален
Другие вопросы из категории
На отрезке [2;3] с шагом 0,1 протабулировать функцию
3sin^3+0,35x-3,8
ько информации несет свод законов племени, если в нем 12 строк и в каждой строке по 20 символов?
Читайте также
1. Вычислите выражение при заданных константах: A=16.5; b=3.4; x=0.61;
2.
Составить программу вычисления значения функции. На экран вывести функцию (записанную на Паскале) вместе с результатом.
у={a+b+cx^2,если 1<=x<2
(a*sin(xb))^2,если 2<=x<3
под корнем |a+bx^2|+c ,если 3<=x<4
a*ln|b+c/2x| ,если 4<=x<5
e^esinx+c^3 ,если 5<=x<6
Пожалуйста...
Треугольник задан координатами своих вершин.Составить программу вычисления площади треугольника.
последний символ имени и предпоследний символ фамилии...
Даны действительные положительные числа x