IPB
ЛогинПароль:

> 

Начальные контакты ТОЛЬКО через личку!!

 
 Ответить  Открыть новую тему 
> Решите,пожалуйста,одну заачу на Pascalе, Найти сумму всех чисел, вводимых с клавиатуры.Программа заканчивает св
сообщение
Сообщение #1


Гость






Найти сумму всех чисел, вводимых с клавиатуры.Программа заканчивает своё выполнение и выводит результат при вводе 0
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Alone in the dark
*

Группа: Пользователи
Сообщений: 48
Пол: Мужской

Репутация: -  1  +


Готов сделать, отпиши мне в пм координаты для связи
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Профи
****

Группа: Пользователи
Сообщений: 559
Пол: Мужской
Реальное имя: Бруно

Репутация: -  10  +


Юля, если речь идёт не о большой арифметике и сумма влезает в тип longint пиши в приват помогу бесплатно.

Сообщение отредактировано: Tan -


--------------------
Цитата
Imagination is more important than knowledge.
Albert Einstein
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Гость






Цитата(Юля @ 4.05.2007 12:44) *

Найти сумму всех чисел, вводимых с клавиатуры.Программа заканчивает своё выполнение и выводит результат при вводе 0


Вот ответ на твой вопросс

[code]uses crt;
var a,summa: integer;
begin
writeln('Vvedi shisla');
summa:=0;
repeat
readln(a);
summa:=summa+a;
until a=0;
writeln(summa);
readln;
end.
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Пионер
**

Группа: Пользователи
Сообщений: 57
Пол: Мужской
Реальное имя: Денис

Репутация: -  0  +


lol.gif
вы вовремя))
на дату посмотрите.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 24.09.2020 20:24
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name