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

программа на паскале:

program xxx;

      var a, b: real;

begin

  writeln('введите количество миль');

  readln(a);

  b: = a*1.6;

  writeln('кол-во киллометров - ',b)

end.

думаю, что 19,5 кб = 0,019 мб.

var

  x,y,z: longint;

begin

  readln(x,y,z);

if (x> 100)or(y> 100)or(z> 100) then writeln('false')

else writeln('true');

end.

одновременно нажать alt и 3 (на цифровой клавиатуре с права)

♥