Прочитайте задачу и выберите вариант фрагмента программы, который позволит получить верный ответ:

Дано целое число n. Найдите сумму цифр этого числа.

• k := 0;
  n := 2348;
  while n > 0 do begin
  k := k + n mod 10;
  n := n div 10;
  end;
  writeln\(k\);
• k := 0;
  n := 2348;
  while n > 0 do begin
  k := k * n mod 10;
  n := n div 10;
  end;
  writeln\(k\);
• k := 1;
  n := 2348;
  while n > 0 do begin
  k := k + n mod 10;
  n := n div 10;
  end;
  writeln\(k\);