Найти минимальное число среди 9 чисел, вводимых с клавиатуры. Использовать три вида цикла

угстчьелчьвдаьплчдвбшплчлулеосьялатп

2000*2000=4000000 пикселей=4 мегапикселей

var a,b,c,s,p: real;

begin

  read(a,b,c);

  p: =(a+b+c)/2;

  s: =sqrt(p*(p-a)*(p-b)*(p-c));

  write(s: 0: 2);

end.

вроде так