Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.03.2011, 21:47   #1
aicer
Новичок
Джуниор
 
Регистрация: 02.03.2011
Сообщений: 1
Вопрос поиск суммы последовательных чисел, вводимых с клавиатуры, предшествующих первому введённому нулю

Помогите пожалуйста решить такую задачу: Нужно написать программу в Poscal для поиска суммы последовательных чисел, вводимых с клавиатуры, предшествующих первому введённому нулю. Хотя бы пример, а то вообще не придумать как это написать.
aicer вне форума Ответить с цитированием
Старый 02.03.2011, 22:29   #2
Hacker19_90
Delphi Warrior
Старожил
 
Аватар для Hacker19_90
 
Регистрация: 15.08.2008
Сообщений: 2,502
По умолчанию

ну во-первых
Цитата:
написать программу в Poscal
Не Poscal, а PASCAL
А во-вторых
Вот вам кусок кода
Код:
sum := 0;
chislo := 0;
repeat
    Read(chislo);
    sum := sum+chislo;
until (chislo = 0);
Writeln ('Сумма равна ', sum);
P.S.: Если помог кликаем весы
Mess with the best, die like the rest. (с) Hackers
Лабораторные, курсовые на Delphi\Pascal\C++
ya.flex-freelance@yandex.ru Icq - 636-954-303
Hacker19_90 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
вычисление суммы вводимых чисел ronny137 Помощь студентам 0 07.12.2010 22:16
Поиск одинаковых значений в стобце, возврат суммы чисел из другого столбца в найденных строках! Kup Microsoft Office Excel 2 25.03.2010 10:15
максимум суммы трех последовательных элементов. Siluet Помощь студентам 3 27.12.2009 22:15
поиск суммы последовательных чисел, вводимых с клавиатуры, предшествующих первому введённому нулю hen Помощь студентам 8 22.04.2009 23:03
вычисление функции по 2-м параметрам вводимых с клавиатуры Sashko Паскаль, Turbo Pascal, PascalABC.NET 1 23.12.2008 16:03