tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано натуральное число
Дано натуральное число n. найти количество двузначных чисел, произведение цифр которых равно n
ladybutiyarowa
3 22.09.2019 08:40
2
Ответы
stanislavvolk8
08.10.2020 09:06
Program n1;
var n,k,i: integer;
begin
k:=0;
readln(n);
for i:=10 to 99 do if (i mod 10)*(i div 10)=n then k:=k+1;
write(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
DartMatv
20.08.2019 00:30
Назовите некоторые имена вирусов и как они действуют...
jungkook010997
12.11.2020 11:38
Назовите несколько особенностей хрящевых рыб. Заранее...
dmoro
29.05.2019 03:10
Скильки битив мистыть повидомлення, довжына двийкового коду якого становыть 3 кбайт?...
LetoForever
29.05.2019 03:10
Известна стоимость монитора, системного блока, клавиатуры и мыши. сколько будут стоить n компьютеров. написать программу в poscal abc...
викуха308
22.11.2020 21:51
SQL скрипты Получить id сотрудника, полное имя (имя и фамилия) сотрудника и название страны, в которой он(а) работает. Вот мой скрипт: select e.employee_id, e.first_name,...
ДианкаСафонова
25.06.2019 19:00
Найти корни квадратного уравнения x(x+a)=0, для произвольного значения постоянного коэффициента a. последний этап решения реализовать на языке программирования pascal....
wtfareudoing
27.06.2019 11:20
Выполните умножение (6а^3+2)(6a^3-2)...
salbekov201
27.06.2019 11:20
Какое из перечисленных существительных не является именем собственным? 1)(о,о)лимпия 2)(о,о)лимпиады 3)(о,о)лимпийские игры...
1SyhakJS2
27.06.2019 11:20
Железо получают восстановлением оксида железа(iii)углем. выход продукта реакции составляет 75%. рассчитайте, какая масса железа может быть получена из оксида железамассой...
Krst263
27.06.2019 11:20
Рассчитать размер файла для сотового телефона размером 100*100 пикселей и количеством цветов в палитре - 16. № 2. рассчитать количество бит, необходимых для кодирования...
Популярные вопросы
Перевести ! it’s early evening and rex geyer and his family are eating...
2
Представь данное число в виде произведения степеней и простых чисел...
3
Велосипедист проехал расстояние 51км за 4часа, а мотоциклист проехал...
3
На сколько градусов надо увеличить температуру чтобы скорость реакции...
2
Complete the senteces. use have got or has got 1) i an aunt and two...
1
Ккаким типам питания относятся реки аягуз, кенгир, ыргыз и жем?...
3
Вставить пропущенные буквы . подчеркнуть слова,написание которых нужно...
3
Составить по ан яз 5 класс рассказ про известное здание...
2
Компьютерная игра состоит из трех этапов в кости набран на первых двух...
3
Үзілген нəрсені байланыстыру сөз жубақ...
3
var n,k,i: integer;
begin
k:=0;
readln(n);
for i:=10 to 99 do if (i mod 10)*(i div 10)=n then k:=k+1;
write(k);
end.