В том, что каждый кадр, рисуется отдельно, потом скомпановывается в один файл.
Ответ:
8
Объяснение:
Крч смотри, у тебя получается в итоге 2211.
Цикл выполняется, пока у тебя есть хотя бы 3 единицы. 3 единицы ты замечаешь на 2, так как в начале у тебя 2 двойки, то ты делаешь обратную подстановку. 2=111, 22=111111. Там еще есть 2 единицы. 6+2=8.
Проверяем.
На входе число 11111111. Видим 3 единицы и меняем их на 2
211111
Видим след 3 единицы, меняем
2211
Больше 3 единицы не нашлось, значит это финальный ответ
100 и 1000 также являются красивыми числами. Приведу код, который короче:
Если я тебя понял правильно делается запрос на имя Елена и дату рождения 1989 и выдается количество подходящих под запрос в твоем случае таких четверо ответ номер 4 (4 подходящих)
Turbo Pascal
USES CRT;
VAR A:array[1..10] of integer;
B:array[1..5] of integer;
C:array[1..5] of integer;
i,bx,cx:integer;
BEGIN
CLRSCR;
Randomize;
For i:=1 to 10 do
begin
A[i]:=1+random(50);
Write(A[i],' ');
end;
Writeln;
bx:=1; cx:=1;
for i:=1 to 10 do
if (i mod 2 = 0) then
begin
B[bx]:=A[i];
bx:=bx+1;
end
else
begin
C[cx]:=A[i];
cx:=cx+1;
end;
For i:=1 to 5 do
Write(B[i],' ');
Writeln;
For i:=1 to 5 do
Write(C[i],' ');
READLN;
END.<span>
</span>