
Дано целое положительное число.Узнать есть ли в нем нечетные цифры если есть написать True ,а если
нет False.Напечатать фразу я учусь программировать Указанное количество раз.Помогите умоляю

Ответы на вопрос

Ответ: var
A: real;
begin
write('A = ');
readln(A);
writeln;
{ Если A > 0, то результат
будет True, иначе - False: }
writeln('Число A является положительным: ', A > 0);
readln
end.
Объяснение:



Ответ:
1.
program z1;
var a,b:integer;
begin
write ('Введите число: ');
readln(a);
repeat
b:=a mod 10;
a:=a div 10
until (a=0) or (b mod 2 <> 0);//прерываем цикл если перебрали все цифры числа или нашли нечётную цифру
write (b mod 2 <> 0)//если условие верно выводит True, в обратном случае False
end.
2.
program z2;
var i,n:integer;
begin
write ('Введите сколько раз напечатать фразу: ');
readln(n);
for i:=1 to n do writeln ('я учусь программировать')
end.



Конечно, я помогу вам с этой задачей! Вот код на языке Python, который проверяет, есть ли в заданном целом положительном числе нечетные цифры и выводит соответствующий результат:
pythonnumber = int(input("Введите целое положительное число: "))
has_odd_digits = False
while number > 0:
digit = number % 10
if digit % 2 != 0:
has_odd_digits = True
break
number //= 10
if has_odd_digits:
print("True")
else:
print("False")
После ввода числа программа проверит его наличие нечетных цифр и выведет "True", если такие цифры есть, и "False", если их нет.
Теперь, если вы хотите напечатать фразу "Я учусь программировать" указанное количество раз, вы можете использовать следующий код:
pythonnum_times = int(input("Введите количество раз: "))
for _ in range(num_times):
print("Я учусь программировать")
Программа запросит у вас количество раз, а затем напечатает фразу "Я учусь программировать" указанное количество раз.
Надеюсь, это поможет вам! Если у вас возникнут дополнительные вопросы, не стесняйтесь задавать.


Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili