Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.89/18: Рейтинг темы: голосов - 18, средняя оценка - 4.89
0 / 0 / 3
Регистрация: 30.09.2013
Сообщений: 45
1

Даны два целых числа А и В (A<B). Найти произведение всех целых чисел от А до В включительно

29.01.2014, 19:56. Просмотров 3495. Ответов 1
Метки нет (Все метки)

помогите
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.01.2014, 19:56
Ответы с готовыми решениями:

Даны два целых числа А и В (A<B). Найти произведение всех целых чисел от А до В включительно
Помогите Пожалуйста

Даны два целых числа A и B (A < B). Найти сумму всех целых чисел от A до B включительно
(For) Даны два целых числа A и B (A &lt; B). Найти сумму всех целых чисел от A до B включительно.

Даны два целых числа A и B (A < B). Найти сумму всех целых чисел от A до B включительно
Желательно сделать в Pascal или Delphi

Даны два целых числа A и B (A < B). Найти сумму всех целых чисел от A до B включительно
Здравствуйте. Проверьте пожалуйста эту задачу Даны два целых числа A и B (A &lt; B). Найти сумму...

1
Эксперт Pascal/Delphi
4642 / 2629 / 831
Регистрация: 04.10.2012
Сообщений: 9,603
29.01.2014, 21:36 2
Лучший ответ Сообщение было отмечено Сергей25 как решение

Решение

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var
a, b, i, p:Integer;
begin
Writeln('Введите через пробел два числа');
Read(a, b);
p :=1;
if a>b then 
begin
Writeln('Первое число должно быть меньше второго');
end
else
begin
for i :=a to b do p :=p*i;
Writeln;
Writeln('Произведение чисел от ',a,' до ',b,'  включительно равно ',p);
end;
Readln;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.01.2014, 21:36

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Даны два целых числа A и B (A < B). Найти сумму всех целых чисел от A до B включительно
Даны два целых числа A и B (A &lt; B). Найти сумму всех целых чисел от A до B включительно. как это...

Даны два целых числа А и В (А<В). Найти сумму квадратов всех целых чисел от А до В включительно
Даны два целых числа А и В (А&lt;В). Найти сумму квадратов всех целых чисел от А до В включительно.

Даны два целых числа А и B (A<B). Найти произведение чисел от А до В включительно
Даны два целых числа А и B (A&lt;B). Найти произведение чисел от А до В включительно. Решить через...

Даны два целых числа A и В, A > B. Выведете произведение всех чисел от А до В.
Даны два целых числа A и В, A &gt; B. Выведете произведение всех чисел от А до В. Пример: А = 2, В...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.