Ниже записан алгоритм. Получив на вход число x, этот алгоритм печатает два числа: a и b.
Сколько существует таких чисел x, при вводе которых алгоритм печатает сначала 2, а потом 12?
Паскаль:
var x, a, b: integer;
begin
readln(x);
a := 0; b := 0;
while x>0 do
begin
a := a + 1;
b := b + (x mod 100);
x := x div 100
end;
writeln(a); write(b)
end.
Бейсик:
DIM X, A, B AS INTEGER
INPUT X
A = 0: B = 0
WHILE X > 0
A = A + 1
B = B + (X MOD 100)
X = X 100
WEND
PRINT A
PRINT B