⇢ Вопросы и ответы ⇢ Программирование ⇢ Другие языки и технологии

составьте программу нахождения произведения нечетных чисел от a до b циклы

Ребят, всем привет Вот.. программу надо написать... Помогите, пожалуйста, кто может... Заранее спасибо... А... В программе обязательно должен присутствовать цикл, программа на языке "паскаль"

Алексей Хатаженков

var
a,b,p,i:integer;
begin
readln(a,b);
p:=1;
for i:=a to b do
p:=p*i;
writeln(p);
end.

Наталья Вега

длячего это
___

var
a,b,p,i:integer;
begin
readln(a,b);
p:=1;
for i:=a to b do
if i mod 2=1 then p:=p*i;
writeln(p);
end.

Похожие вопросы

Помогите составить программу в паскале. Даны три числа a,b,c. Найти произведение (a*b*c) и max из трех.

Задача по паскалю. Составьте программу нахождения произведения нечетных чисел 3x5x7x...x13. ?

на языке паскаль. Составьте программу вычисления в массиве b(8) суммы нечетных элементов. Напишите целиком всю программу.

Помогите составить блок-схему и программу для вычисления произведения нечетных чисел от 11-177

Даны два числа a и b составить программу нахождения большего из двух чисел

проанализируйте следующий цикл. while a (меньше) b do c:= a= b;

Помогите решить задачу по паскалю! ) Найти количество нечетных чисел в интервале от a до b (a и b вводятся с клавиатуры).

Программа по Паскалю. Составить программу вычисления суммы квадратов нечётных чисел от a до b.

1. Найти минимум из чисел A и B. 2. Найти максимум из чисел A и B. 3. Вычислить модуль числа A.

Составьте программу с циклом FOR, выводящую на экран сумму нечетных чисел от 1 до 10 (Бейсик):