Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
0 / 0 / 0
Регистрация: 26.01.2011
Сообщений: 18
1

В ответ выписать знаменатель последней дроби, для которой выполняется условие

27.02.2011, 17:49. Показов 1281. Ответов 2
Метки нет (Все метки)

Помогите сделать программу) Если не сложно объясните алгоритм размышления построения программы)
Программа должна быть выполнена с помощью оператора while или repeat until.
Известо, что идёт сложение дробей таких как 1/2+2/3+3/4+4/5 и тд. Всё это суммируется и равно некой сумме S (дробное число), то есть 1/2+2/3+3/4+4/5+...n/n+1=S.
Вводится число а. Программа должна в ответ выписать знаменатель последней дроби, для которой выполняется условие S<a.То есть я так понял дробь имеет структуру n/n+1, выписать надо непосредственно n+1 только одной единственной дроби, прис сложении который с предыдущими сумма S впритык меньше a.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.02.2011, 17:49
Ответы с готовыми решениями:

Сокращение дроби, числитель которой равен Р, а знаменатель Q (Pascal -> Java)
Составить программу сокращения дроби, числитель которой равен Р, а знаменатель Q function...

Составить программу сокращения дроби, числитель которой равен Р, а знаменатель Q
с использованием процедуры нахождения наибольшего общего делителя

Даны две простые дроби числитель первой А, знаменатель В, числитель второй дроби С, знаменатель D.
Даны две простые дроби числитель первой А, знаменатель В, числитель второй дроби С, знаменатель D....

Знаменатель каждой дроби разложить на множители и полученое выражение представить в виде дроби
по моему тут какая то лажа что скажите?

2
3 / 3 / 2
Регистрация: 13.11.2010
Сообщений: 57
27.02.2011, 18:01 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
uses crt;
var s,a:real;
n:integer;
begin
writeln ('Введите число:');
readln (a);
n:=1;
s:=0;
while (a>s) do
begin
s:=s+(n/n+1);
n:=n+1;
end;
writeln ('Знаменатель:',n-1);
end.
0
Почетный модератор
64065 / 47477 / 32732
Регистрация: 18.05.2008
Сообщений: 115,185
27.02.2011, 19:30 3
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses crt;
var s,a:real;
    n:integer;
begin
writeln ('Введите число:');
readln (a);
n:=0;
s:=0;
while s<a do
 begin
  n:=n+1;
  s:=s+n/(n+1);
 end;
if s>=a then
 begin
  s:=s-n/(n+1);
  n:=n-1;
 end;
writeln ('s=',S:0:4,'  Знаменатель:',n+1);
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.02.2011, 19:30

Вводятся числитель a и знаменатель b дроби. Вывести: знак, целую часть, сокращенные числитель и знаменатель
Вводятся числитель a и знаменатель b дроби. Вывести: знак, целую часть, сокращенные числитель и...

Укажите номер таблицы, для которой выполняется условие «Максимальная протяженность маршрута от пункта А до пункта С не больше 5
2) В таблицах приведена протяженность автомагистралей между соседними населенными пунктами. Если...

Для числителя и знаменателя дроби получить знак, целую часть, сокращенные числитель и знаменатель.
Немного не понимаю как в этой задаче вывести сокращенные числитель и знаменатель. остальное всё...

Отделить в дроби знаменатель от числителя
Доброго времени суток. Народ, подскажите плиз, как реализовать задачу - нужно отделить в дроби...


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

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

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