Разработайте программу, используя оператор REPEAT: произвести суммирование 10 произвольно введенных целых чисел

@LedyVik · Регистрация: 18.12.2012

Разработайте программу, используя оператор REPEAT: произвести суммирование 10 произвольно введенных целых чисел.

Kodzaev · 26.04.2013, 12:15

Pascal

Var
  s,i,n: Integer;
BEGIN
Repeat
 i:=i+1;
 Readln(n);
 s:=s+n;
until i=10;
Writeln('SUM=',s);
Readln
END.

@LedyVik 0 / 0 / 0 Регистрация: 18.12.2012 Сообщений: 53
		1
	Разработайте программу, используя оператор REPEAT: произвести суммирование 10 произвольно введенных целых чисел 26.04.2013, 11:57. Показов 1704. Ответов 1 Метки нет (Все метки) Разработайте программу, используя оператор REPEAT: произвести суммирование 10 произвольно введенных целых чисел. 0

	26.04.2013, 12:15

Опции темы

Решение