Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Masha6655
10.03.2021 00:22 •
Информатика
Составить программу для нахождения произведения чётных чисел из диапозона от 3 до 17. с подробным решением!
Показать ответ
Ответ:
ВладаФролова01
12.06.2020 04:03
var i,k:integer;
begin
for i:=3 to 17 do if i mod 2 = 0 then k:=k*i;
write(k);
end;
0,0
(0 оценок)
Популярные вопросы: Информатика
MilenaNasifullina
01.04.2021 10:44
Диаграмма демонстрирует средний по предмету «Информатика» учащихся 10-х классов за период 2014-2017 гг. Напишите код программы, с использованием интегрированной...
eniyo2005
12.02.2020 15:11
Последовательность состоит из натуральных чисел и завершается числом 0. определите, сколько элементов этой последовательности равны её наибольшему элементу. желательно...
ifrut52
06.12.2021 11:26
Составьте синквейн к слову Файл и папка...
2000nmz
08.02.2020 06:50
Какая программа робота-вышивальщика воспроизводит орнамент? Даю 10б...
FeGLoCk
19.02.2022 18:02
3. В каких папках находятся звуки?...
kazbekkhatitow7h52
10.10.2020 18:49
ТУРБО ПАСКАЛЬ 7.0 НОМЕР 5Описать структуру с именем AEROFLOT, содержащую следующие поля:-название пункта назначения рейса-номер рейса- тип самолета.Написать программу,...
kottonkandy
01.10.2021 15:29
Написати програму яка буде показувати на екран квадрат числа введеного користувачем постійно в с++...
ДОМАШКАФИЗИКА
09.10.2021 04:12
Y=cos^2 x^2+sin^2x^3 создать программу...
Innochka098
06.08.2022 22:08
(pascalABC) Напишите логическую функцию, которая определяет, являются ли два переданные ей числа взаимно то есть, не имеющими общих делителей, кроме 1....
нур101
29.04.2023 09:08
Задать таблицу из 5 строк и 5 столбцов, состоящую из случайных чисел (интервал от 1 до 50). А). Найти сумму чисел в каждом столбце ИЛИ Б). Найти наибольшее число...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i,k:integer;
begin
for i:=3 to 17 do if i mod 2 = 0 then k:=k*i;
write(k);
end;