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

Бейсик

Python

DIM X, L, M, Q AS INTEGER

INPUT X

Q = 8

L = 0

WHILE X >= Q

 L = L + 1

 X = X - Q

WEND

M = X

IF M < L THEN

   M = L

   L = X

END IF

PRINT L

PRINT M

x = int(input())

Q = 8

L = 0

while x >= Q:

    L = L + 1

    x = x - Q

M = x

if M < L:

    M = L

    L = x

print(L)

print(M)

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

Паскаль

алг

нач

  цел x, L, M, Q

  ввод x

  Q := 8   

  L := 0

  нц пока x >= Q

    L := L + 1

    x := x - Q

  кц

  M := x

  если M < L

    то

      M := L

      L := x

  все

  вывод L, нс, M

кон

var x, L, M, Q: integer;

begin

  readln(x);

  Q := 8

  L := 0;

  while x >= Q do

  begin

    L := L + 1;

    x := x - Q;

  end;

  M := x;

  if M < L then

  begin

    M := L;

    L := x;

  end;

  writeln(L);

  writeln(M);

end.

Си

#include

void main()

{

  int x, L, M, Q;

  scanf("%d", &x);

  Q = 8;   

  L = 0;

  while (x >= Q){

    L = L + 1;

    x = x - Q;

  }

  M = x;

  if (M < L){

    M = L;

    L = x;

  }

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

}