Вывести сумму всех чисел и предпоследнее число последовательности

@MemBoo · Регистрация: 04.11.2014

Студворк — интернет-сервис помощи студентам

Последовательно вводятся исходные данные-целые числа.Последовательность оканчивается числом 0.Вывести сумму всех чисел и предпоследнее число последовательности.

@APALoff · 01.12.2014, 15:07

Для N>1:

Pascal

sum:=0;
Repeat
  pred:=a;
  Readln(a);
  sum:=sum+a;
Until a=0;
Writeln(sum);
Writeln(pred);

@MemBoo · 01.12.2014, 15:28 **[ТС]**

Полностью программу написать сможешь если не затруднит

@APALoff · 01.12.2014, 15:31

Долго думал, каким же знаком Вы пренебрегли в конце своего предложения "!" или "?"... решил больше не думать - я "пас".

@MemBoo 0 / 0 / 0 Регистрация: 04.11.2014 Сообщений: 15
		1
	Вывести сумму всех чисел и предпоследнее число последовательности 01.12.2014, 14:58. Показов 1218. Ответов 3 Метки нет (Все метки) Последовательно вводятся исходные данные-целые числа.Последовательность оканчивается числом 0.Вывести сумму всех чисел и предпоследнее число последовательности. 0

@MemBoo 0 / 0 / 0 Регистрация: 04.11.2014 Сообщений: 15
	01.12.2014, 15:28 [ТС]	3
	Полностью программу написать сможешь если не затруднит 0

@APALoff 1646 / 1075 / 1081 Регистрация: 03.07.2013 Сообщений: 4,507
	01.12.2014, 15:31	4
	Долго думал, каким же знаком Вы пренебрегли в конце своего предложения "!" или "?"... решил больше не думать - я "пас". 1

Опции темы

Вывести сумму всех чисел и предпоследнее число последовательности

Решение