tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Другие предметы
Хто такая Насця Закрэўская?
Хто такая Насця Закрэўская?
НВТула
2 17.04.2019 01:50
1
Ответы
Neckbeardicus
01.06.2020 19:59
Var
i, n, k: integer;
begin
read(n);
for i := 1 to n do
if (i mod 2 = 0) and (n mod i = 0) then
k := k + 1;
writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Другие предметы
Khajiit999
11.05.2020 15:45
Послідовно включено три резистори: R1=10 Ом; R2=15 Ом; RЗ = 6 Ом. Яке падіння напруги буде на третьому резисторі, якщо до кола прикладена напруга, рівна 62 В?...
Даняша09
11.05.2020 15:45
Твір на тему Cztowiek i przyroda- wrogowie czy przyjaciele на 10 реченнь...
kuchatrupov47
20.04.2019 07:30
Проект о здоровой еде для 5 класса...
ImHappy102
20.04.2019 07:14
30 ! полемическое искусство: понятие спора,виды спора ,правила ведения спора,формы спора....
Poli4ka228
20.04.2019 07:08
Подготовте презентацию 7-8 минут о памятниках искусства эпохи железа, выполненных в зверином и полихромном стиле...
KriSha11
20.04.2019 09:12
Истиное название сказки кошка девочка...
halfa
20.04.2019 09:03
Решить. это техническая механика. если можно то с решением....
Damira123451
20.04.2019 08:44
До нотаріуса звернувся гр. іванов м.і. за посвідченням договору купівлі-продажу квартири, належної йому на підставі свідоцтва про право власності, виданого виконкомом...
dilmurod9292
20.04.2019 08:40
Каков наибольший угловой диаметр земли, рассмаориваемый с марса на расстоянии 0.378 а.е.? ...
Chernaya4
20.04.2019 08:39
Вкаком году из перечисленных во владимирской области смертность была наибольше? 1) 1994 г., 2) 1998 г., 3) 2002 г., 4) 2008 г....
Популярные вопросы
Как произошел microsoft office word 2007...
2
Если 78 вывести из под корня сколько будет...
2
ответить на вопросы атырау кандай кала?...
2
Write about your dream day in the country(напиши о дне своей мечты...
2
Абидоне 30 литров молока.из него налили молоко в банки: в одну...
3
Подчеркни в каждой строке лишнее слово 1 юркие светлые узкий темные...
2
Объясниое понятным языком, что такое государственное регулирование...
2
Cos a=0.8 определите sin a, tg a, ctg a, если 0 x п/2...
1
Один из смежных углов в 3 раза больше другого. найдите градусные...
3
Написать характеристику 3-4 предложения героя кожа из фильма (меня...
1
i, n, k: integer;
begin
read(n);
for i := 1 to n do
if (i mod 2 = 0) and (n mod i = 0) then
k := k + 1;
writeln(k);
end.