Який фрагмент алгоритму називають вкладеним циклом?
​

var

s,a,n,i,min,max: integer;

begin

min: =32767;

max: =-32768;

readln(n);

for i: =1 to n do

begin

readln(a);

if a< min then min: =a;

if a> max then max: =a;

end;

s: =(min+max)/2;

writeln(s);

end.

не знаю в каком виде это должно быть

1 ввод возрастов

2 если s> m то пишем "саша старше маши "

3 иначе если s=m то пишем "саша и маша ровестники"

4 иначе пишем "маша старше саши"

в первом нет строчки 3

var i: integer;

begin

  for i: = 35 to 87 do

      if i mod 7 =1 then

          writeln(i);

end.

var i: integer;

s,v: real;

begin

  read(i,v);

  case i of

      1: s: =pi*v*v;

      2: s: =pi*v*v/4;

      3: s: =v*v/pi/4;

  end;

  writeln(s);

end.