Информатика, опубликовано 07.06.2020 02:01
с заданием по информатике за 9 класс
Ответ оставил: Гость
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен", Приём ИЗ "...ОтделыОбмен";
ПЕР
число, цифра: ЦЕЛ;
УКАЗ
число := Приём.Число(); Вывод.Цепь("^");
цифра := Приём.Число(); Вывод.Цепь("^");
КОЛЬЦО
ПОКА число > 0 ВЫП
ЕСЛИ число ОСТАТОК 10 = цифра ТО
Вывод.Цепь("ДА");
ВЫХОД
КОН
КОН;
Вывод.Цепь("НЕТ");
ВЫХОД
КОН
КОН Задание.
ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен", Приём ИЗ "...ОтделыОбмен";
ПЕР
число, цифра: ЦЕЛ;
УКАЗ
число := Приём.Число(); Вывод.Цепь("^");
цифра := Приём.Число(); Вывод.Цепь("^");
КОЛЬЦО
ПОКА число > 0 ВЫП
ЕСЛИ число ОСТАТОК 10 = цифра ТО
Вывод.Цепь("ДА");
ВЫХОД
КОН
КОН;
Вывод.Цепь("НЕТ");
ВЫХОД
КОН
КОН Задание.
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01