0 / 0 / 0
Регистрация: 20.11.2016
Сообщений: 3
1

Написать программу которая запрашивает ряд чисел и считает их сумму

20.11.2016, 21:33. Показов 2632. Ответов 6
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
написать программу которая запрашивает ряд чисел и считает их сумму. количество чисел не ограничено. при нажатии цифры "1" - ввод чисел прекращается
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.11.2016, 21:33
Ответы с готовыми решениями:

Написать программу, которая запрашивает у пользователя отрицательные числа и считает их сумму
Написать программу, которая запрашивает у пользователя отрицательные числа и считает их сумму. Как...

Написать программу, которая запрашивает данные на 2-ух учеников
Описать массив 50 элементов для учеников и ввести сведения для 5 учеников и вывести данные...

Написать программу, которая запрашивает имя пользователя и здоровается с ним
1.Написать программу, которая запрашивает имя пользователя и здоровается с ним. program pr;...

Написать программу которая запрашивает реальное число х и высчитавает р по формуле
написать программу которая запрашивает реальное число х и высчитавает р по формуле : р=х2+1...

6
Эксперт Pascal/Delphi
2386 / 1298 / 1492
Регистрация: 29.08.2014
Сообщений: 4,661
21.11.2016, 08:55 2
Цитата Сообщение от J2fan Посмотреть сообщение
при нажатии цифры "1" - ввод чисел прекращается
т.е. цифра 1 не входит ни в одно число? или нельзя ввести число 1?
0
Почетный модератор
64301 / 47596 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
21.11.2016, 14:01 3
Pascal
1
2
3
4
5
s:=0;
repeat
readln(a);
if a<>1 then s:=s+a;
until a=1;
0
CAPITAL OF ROCK!
1281 / 708 / 982
Регистрация: 03.03.2010
Сообщений: 2,286
21.11.2016, 16:17 4
Pascal
1
2
3
4
5
6
s := 0;
repeat
    ReadLn(a);
    Inc(s, a);
until (a = 1);
Dec(s);
0
Почетный модератор
64301 / 47596 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
21.11.2016, 16:21 5
Цитата Сообщение от J2fan Посмотреть сообщение
которая запрашивает ряд чисел
Не написано что числа целые.
0
CAPITAL OF ROCK!
1281 / 708 / 982
Регистрация: 03.03.2010
Сообщений: 2,286
21.11.2016, 16:33 6
Лучший ответ Сообщение было отмечено J2fan как решение

Решение

а пожалуйста! ©
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
const
    EPS = 0.0001;
var
    s, a: Real;
begin
    s := 0;
    repeat
        ReadLn(a);
        s := s + a;
    until (Abs(a - 1) < EPS);
    s := s - 1;
    //WriteLn('sum=', s:0:2); //вывод в условии ж не озвучен
end.
1
Модератор
9893 / 5257 / 3312
Регистрация: 17.08.2012
Сообщений: 16,049
22.11.2016, 01:42 7
JokeR.BY, число 1 в разрядной сетке компьютера представляется в любом формате абсолютно точно. И вообще, любое вещественное число, все единичные разряды двоичного представления которого полностью помещаются в поле мантиссы, представляется абсолютно точно (естественно, если порядок тоже помещается). В частности, например, любое целое число до ±high(uint64) включительно, абсолютно точно представимо числом типа extended. И до кучи ещё целая гора целых чисел, все единичные разряды которых помещаются в 64 разряда, а все остальные (младшие) заполнены нулями.

Eps в данном случае не нужен.
0
22.11.2016, 01:42
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.11.2016, 01:42
Помогаю со студенческими работами здесь

создайте программу которая считает сумму
создайте программу которая считает сумму S= a + b + c + d каждый в степени k (a b c d получают...

Написать программу,которая вычисляет сумму первых N нечетных положительных чисел
Написать программу,которая вычисляет сумму первых N нечетных положительных чисел.Количество чисел...

Написать программу которая считает количество цифр в факториале
Помогите написать программу которая считает количество цифр в факториале

Написать программу, которая считает количество элементов во втором предложении
Написать программу,которая считает количество элементов во втором предложении


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru