Введите ответ в поле ввода

Бейсик

Python

DIM I, S, N AS INTEGER

I = 0

S = 36

N = 1

WHILE S > 0

  S = S – 8

  N = N * (I + 1)

  I = I + 1

WEND

PRINT(N)

i = 0

s = 36

n = 1

while s > 0:

    s = s - 8

    n = n * (i + 1)

    i = i + 1

print(n)

Алгоритмический язык

Паскаль

алг

нач

  цел i, s, n

  i := 0

  s := 36

  n := 1

  нц пока s > 0

    s := s — 8

    n := n * (i + 1)

    i := i + 1

  кц

  вывод n

кон

var i, s, n: integer;

begin

  i := 0;

  s := 36;

  n := 1;

  while s > 0 do

  begin

    s := s – 8;

    n := n * (i + 1);

    i := i + 1

  end;

  writeln(n)

end.

Си

#include

void main()

{

  int i, s, n;

  i = 0;

  s = 36;

  n = 1;

  while (s > 0)

  {

    s = s – 8;

    n = n * (i + 1);

    i++;

  }

  printf("%d\n", n);

}