 
Вопрос задан 12.07.2023 в 05:07.
Предмет Информатика.
Спрашивает Сёмкина Настя.
Помогите пажалуйста по информатике( Срочно надо. Надо решить на языке КуМир задачу: Вы ввели
трехзначное число. Затем ввели любую цифру. Составьте программу, определяющую, есть ли в этом числе данная цифра. Только на языке кумир. Заранее спасибо тебе огромное, или вам. :) Там в программе ещё есть команды: алг, нач, ещё, вывод, ввод, и, нс и тд. если поможете дам 5 звёзд и спасибо) 0
        0
         0
        0
    Ответы на вопрос
 
        Отвечает Ибрагимова Алена.
                
    Ответ:
var
a,b:longint;
begin
readln(a,b);
while a>0 do
begin
if a mod 10=b then
begin
writeln('Est');
halt;
end;
a:=a div 10;
end;
writeln('Net');
end.
 0
                    0
                     0
                    0
                 
            Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
                
    Конечно, я помогу вам написать программу на языке КуМир для определения наличия заданной цифры в трехзначном числе. Вот программа:
arduinoалг
    нач
    вывод "Введите трехзначное число:"
    ввод число
    вывод "Введите цифру:"
    ввод цифра
    
    ещё
        и число >= 100 и число <= 999
        и цифра >= 0 и цифра <= 9
    тогда
        нц естьЦифра = ложь
        ещё
            и число % 10 = цифра
        тогда
            естьЦифра = правда
        и
            или
                и число / 10 % 10 = цифра
                или число / 100 = цифра
            тогда
                естьЦифра = правда
            тогда
                естьЦифра = ложь
            нц
        нц
        
        вывод "Цифра " + цифра + " " + если естьЦифра тогда "присутствует в числе." иначе "не присутствует в числе."
    иначе
        вывод "Ошибка! Введите трехзначное число и цифру."
    тц
кон
Эта программа позволяет пользователю ввести трехзначное число и затем любую цифру. Она проверяет, есть ли данная цифра в этом числе и выводит соответствующее сообщение.
Удачи вам! Если у вас возникнут ещё вопросы, не стесняйтесь задать. Буду рад помочь!
 0
                    0
                     0
                    0
                Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
Предметы
	- 
			Математика 
- 
			Литература 
- 
			Алгебра 
- 
			Русский язык 
- 
			Геометрия 
- 
			Английский язык 
- 
			Химия 
- 
			Физика 
- 
			Биология 
- 
			Другие предметы 
- 
			История 
- 
			Обществознание 
- 
			Окружающий мир 
- 
			География 
- 
			Українська мова 
- 
			Информатика 
- 
			Українська література 
- 
			Қазақ тiлi 
- 
			Экономика 
- 
			Музыка 
- 
			Право 
- 
			Беларуская мова 
- 
			Французский язык 
- 
			Немецкий язык 
- 
			МХК 
- 
			ОБЖ 
- 
			Психология 
- 
			Физкультура и спорт 
- 
			Астрономия 
- 
			Кыргыз тили 
- 
			Оʻzbek tili 
 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			