Паскаль. найти произведение всех нечетных чисел от числа "а" до числа "b" !
rouberuplay
2
27.08.2019 02:10
0 
Популярные вопросы
- Берілген тақ санның келесі тақ санмен қосындысы 36дан кіші. соңғы(келесі)...
3 - Найдите расстояние от проксима центавра до альфа центавра a и b....
2 - Поставьте следующие предложения с модальными глаголами в вопросительную...
2 - 3в минус второй степени разделить на 3 в минус 3 +0,3 в - 1 степени...
2 - Могут ли использоваться продукты жизнедеятельности одних организмов...
1 - б словотворення слова учитель . визначити твірне слово, твірну основу....
1 - Сравните учение мартина лютера и жана кальвина. укажите не менее четырёх...
3 - Рассчитайте массовую долю кислорода в гидроксиде железа iii, в фосфате...
3 - Политическое развитие реформы 1820-1840 всеобщая - 9 класс...
3 - Точка т лежит на положительной полуоси абсцесс на расстоянии 3 от точки...
3
// Внимание! Если программа не работает, обновите версию!
begin
var a,b:integer;
Write('Введите a и b: '); Read(a,b);
if a.IsEven then a+=1;
Writeln(Range(a,b,2).Aggregate(BigInteger(1),(m,n)->m*n))
end.
Пример
Введите a и b: 8 150
580554122049849093827527200003507344139941951124024707479403873680711622959632935925467423493256663987453900243591243743896484375