Вопрос по информатике:
Даны два числа А и В (А<В) . Найти произведение всех целых чисел от А до В включительно. For
- 26.08.2018 11:32
- Информатика
- remove_red_eye 15861
- thumb_up 13
Ответы и объяснения 1
Program abc;
var a,b,c,i,i1:integer;
begin
readln(a,b);
if(afor i:=1 to b do
begin
i1:=i+1;
c:=i1+i;
end;
if(a>b) then
for i:=1 to a do
begin
i1:=i+1;
c:=i1+i;
end;
writeln(c);
end.
- 27.08.2018 07:52
- thumb_up 3
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.