Дано натуральное число.
Верно ли, что количество его цифр есть четное число, а само число не превышает b ?
Написать программу на паскале используя циклы, но не используя массивы, строковый тип и boolean
Верно ли, что количество его цифр есть четное число, а само число не превышает b ?
Написать программу на паскале используя циклы, но не используя массивы, строковый тип и boolean
More Questions From This User See All
Answers & Comments
begin
write(' b = '); readln(b);
write(' n = '); readln(n);
i:=n; k:=0;
while i>0 do
begin
i:=i div 10; k:=k+1;
end;
if n<=b then writeln('число n не превышает ',b)
else writeln('число n больше ',b);
if (k mod 2) = 0 then writeln('число цифр = ',k,' - четное')
else writeln('число цифр ',k,' - нечетное');
end.