Аквариум имеет форму прямоугольного параллелепипеда с размерами А,В,С (измерения даны в сантиметрах). Поместиться ли в него вода объемом V литров? (1 литр = 1 куб. дм =1000 куб.см). Нужно сделать эту задачу,записав программу в Паскале очень надо

// pascalabc.net 3.0, сборка 1128 uses   system.text.regularexpressions;   begin   var s: ='        - 32      / - 21  ';   s: =regex.replace(s,'\s','');   var a: =regex.matches(s,'(-{0,1}\d+)|[\+\-\*/]');   var n: =a.count;   var x,y: integer;   var c: char;   case n of   3: begin       x: =strtoint(a[0].tostring); y: =strtoint(a[2].tostring);       c: =a[1].tostring[1]       end;   2: begin       x: =strtoint(a[0].tostring); var s1: =a[1].tostring;       c: =s1[1]; s1[1]: ='0'; y: =strtoint(s1)       end;   else       begin writeln('недопустимое выражение'); exit end   end;   writeformat('{0} {1} {2} = ',x,c,y);   case c of   '+': writeln(x+y);   '-': writeln(x-y);   '*': writeln(x*y);   '/': writeln(x/y)   end end. тестовое решение: -32 / -21 = 1.52380952380952 // pascalabc.net 3.0, сборка 1128 begin   var s: ='4km-549_ffb)5)6';   var t: =s.where(x-> x in ['0'..'9']).joinintostring('');   var n: int64;   if trystrtoint64(t,n) then writeln(2*n)   else writeln('не удалось выделить число') end. тестовое решение: 909912