6. известно, что нормальный вес человека можно определить, используя формулу: вес = рост (см) * окружность гр. клетки (см) / 240 как записать алгоритмом в паскале? надо, ,

Var
  ves,rost,ogk:real;
begin
  Write('Введите рост и длину окружности грудной клетки в см: ');
  Readln(rost,ogk);
  ves:=rost*ogk/240;
  Writeln('Нормальный вес равен ',ves:5:1,' кг.')
end.