1. Известно, что нормальный вес человека можно определить, используя формулу:
Вес = рост (см) * окружность гр. клетки (см) / 240
Составить алгоритм и программу для определения веса по этой формуле.
2. Записать алгоритм для вычисления произведения и деления двух чисел
1.
Program p1;
var r,g:integer; v:real;
begin
write(Рост (см) = ); readln(r);
write(Гр. клетка (см) = ); readln(g);
v:=r*g/240;
writeln(Вес = ,v:5:2);
end.
Пример:
Рост (см) = 160
Гр. клетка (см) = 90
Вес = 60.00
2.
Program p2;
var a,b,c:integer; d:real;
begin
write(a = ); readln(a);
write(b = ); readln(b);
c:=a*b;
writeln(a, * ,b, = ,c);
d:=a/b;
writeln(a, / ,b, = ,d);
end.
Пример:
a = 8
b = 10
8 * 10 = 80
8 / 10 = 0.8
Оцени ответ
