Укажите формулировку задачи, которую решает данная программа.
Program N;
var x, k, S: integer;
Begin
Readln\(x\);
k := 0; S := 0;
while x<>0 do begin
if x mod 10 mod 2 <> 0
then S := S + x mod 10;
x:=x div 10;
k:=k+1;
end;
Writeln\(k\);
Writeln\(S\);
end.

• Нахождение количества всех цифр и суммы нечётных цифр.
• Нахождение количества всех цифр и количество нечётных цифр.
• Нахождение суммы всех цифр и суммы чётных цифр.
• Нахождение количества цифр и суммы чётных цифр.