До якої групи команд належить команда неперервного повторення Завжди?

var t: integer;

begin

  read(t);

  while t > 6 do

      t: =t-6;

 

  case t of

      0..2: write('green');

      3: write('yellow');

      4..6: write('red');

  end;

end.

Буквы. ударные или безударные слоги.  сам знаки могут выглядеть как угодно, например, точка-тире.   на ум приходят пдд. напр, на светофоре знак красного человечка "стой", зеленого "иди" и т.д.

var s,r: real;

begin

  read(r);

  s: =pi*sqr(r);

  writeln(s: 0: 4);

end.

for a : = 1 to 20 do

begin

    writeln(a,"^2 = ", a*a);

end

 

или

 

a: = 1;

repeat

    writeln(a,"^2 = ", a*a);

    a : = a + 1;

until a > 20;