Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Алина050913
18.06.2021 15:25 •
Информатика
Паскаль. решить с циклов. 9кл. найти количество нечетных делителей натурального числа, больших к ( к вводится с клавиатуры) написать хотя бы модель.
Показать ответ
Ответ:
помогитееееее3
07.07.2020 10:24
Var K,n,i: integer;
begin
writeln('Введите число');
readln(K); n:=0;
for i:=1 to K do
if (i mod 2=1)and(K mod i =0) then n:=n+1;
writeln('Количество нечетных делителей числа равно ', n);
readln
end.
Выбирайте лучший ;)
0,0
(0 оценок)
Популярные вопросы: Информатика
KapitanNEMO
07.06.2021 08:03
Шрифт вкусный чай закодирован как текст жпшцтао ьео как будет выглядеть слово сканер...
nutadobrenkaya
30.08.2022 11:27
Постройте таблицы истинности для следующих логических выражении: a^(b∨c) a∨(-b^c)...
0Neder0
23.06.2022 02:48
Определите значение переменной М, после выполнения фрагмента алгоритма. (Примечание: знаком :=обозначена...
Anna1111251
12.07.2020 02:57
Знайдіть в Інтернеті дані щодо кількості населення в Україні за останні 5 років. Створіть електронну таблицю за цими даними: секторну, лінійчату й графік.Розмістіть їх на...
РюЛайон
22.02.2022 15:35
Выделите те выражения, которые принимают значение False (ложь) при выполнении условия «точка принадлежит заштрихованной области». *х = 1.5 и y = 1.5-2 x 2 и -3 y 2x = 0 и...
НепосредственноКаха8
24.04.2022 01:41
1) 1)Автомат получает на вход четырёхзначное натуральное число и строит новое число по следующему алгоритму: 1. вычисляются суммы первой и второй, второй и третьей и третьей...
Matvey0061
21.10.2020 19:22
1 а) команда программы б) команда монитора в) команда памяти 2а)шиныб)память в) данные ...
аноним0000001
12.01.2022 00:48
очень нужно! Сделай задания по скринам!...
nikolaivanov11
07.07.2022 11:28
Определите что в перечисленных величинах является константой *Количество минут в часеКоличество пассажиров в вагоне метроГеографические координаты острова ВрангеляКоличество...
UlianaModerator
15.02.2020 06:57
Напишите программу, которая проверяет, можно ли получить из одного имени другое путем перестановки его букв. при этом регистром букв нужно пренебречь. stop pots yes abbc...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
writeln('Введите число');
readln(K); n:=0;
for i:=1 to K do
if (i mod 2=1)and(K mod i =0) then n:=n+1;
writeln('Количество нечетных делителей числа равно ', n);
readln
end.
Выбирайте лучший ;)