Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
papashamuslimo
15.06.2020 10:12 •
Информатика
Используя цикл for составить программу вычисления произведения нечётных чисел в диапозоне от 25 до 60
Показать ответ
Ответ:
ketti336
23.06.2020 14:26
На бейсике: p=1
for i= 25 to 60 step 2
p=p*i
next
print p
на паскале: var i,p:integer;
for i:=25 to 60 do
if i mod 2 =1 then p:=p*i;
write(p);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
azamatyusupov
13.10.2020 13:41
Петр наугад тянет из непрозрачного мешочка одну конфету из 16. какое кол-во информации он получит ; когда достанет конфету, если все конфеты одинаковы по форме, но...
настюшанастя1200
13.10.2020 13:41
Язык - pascal. даны натуральные числа n,. составьте программу,которая вычисляет сумму тех элементов последовательности a1, an,которые нечетны и отрицательны...
Balans456
03.06.2023 20:43
1.Що таке сортування? Як виконати сортування за даними одного з полів? 2. Як відмінити сортування? 3. Яка послідовність операцій під час сортування за кількома полями?...
зарина298
27.09.2022 18:38
Впрограмме кумир (чертёжник) нарисовать веер , буду 35...
Околофутбольник
11.02.2020 19:31
Составить блок-схемуданы 3 числа (любых), программа должна посчитать и вывести кол-во чисел, которые делятся на три...
SonyaNik228
02.06.2021 05:09
49+25 и поставлю отметку лучший!...
ElizavetaMusic
09.10.2020 13:30
Сколько раз повториться цикл for i: =1 to 10 do ? a) 10 b) 9 c) 11 d) 12...
vladplotnikov2
18.05.2023 03:58
Вубывающем цикле с параметро счётчик изменяется на : ? а) 1 b) -1 c) 2 d) 0...
andreuss2006
10.02.2021 10:39
На малюнку зображено вікно програми Power Point кілька елементів вікна виділені і позначені літерами оберіть номер літери якою позначають кнопкизміни маштабу...
Эвелиночкаddd
11.01.2020 13:17
Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, кратных 3 и оканчивающихся на 0. Программа получает на вход натуральные...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
for i= 25 to 60 step 2
p=p*i
next
print p
на паскале: var i,p:integer;
for i:=25 to 60 do
if i mod 2 =1 then p:=p*i;
write(p);
end.