Две задачки с циклом - Паскаль, Turbo Pascal, PascalABC.NET

YoBa · 14.12.2011, 17:40

1. Найти сколько слагаемых необходимо, чтобы сумма 3+7+11+15+… оказалась больше 100.
2. С клавиатуры вводятся целые числа. Определить количество положительных, как только их сумма превысит 10.

Arigato · 14.12.2011, 17:45

А от нас вы чего хотите-то?

YoBa · 14.12.2011, 17:47

Как решить то

YoBa · 14.12.2011, 18:01

кто может помогите

Arigato · 14.12.2011, 18:09

Цитата:

Сообщение от YoBa

Как решить то

1. Переменной A присваиваем 3 - это очередной элемент последовательности. Переменной S присваиваем 3 - это будет наша сумма. Переменной C присваиваем 1 - это число слагаемых. Далее выполняем цикл while пока S <= 100. В цикле A увеличиваем на 4, S увеличиваем на A, C увеличиваем на 1. После цикла в C ответ задачи.

2. Не понятно условие. Как только сумма целых чисел превысит 10 или только положительных...

YoBa · 14.12.2011, 18:16

Первую можно расписать а то не очень понятно а во второй определить количество положительных, как только их сумма превысит 10

Arigato · 14.12.2011, 18:29

Цитата:

Сообщение от YoBa

Первую можно расписать а то не очень понятно

Так я выше подробно расписал же уже.

Цитата:

Сообщение от YoBa

а во второй определить количество положительных, как только их сумма превысит 10

Да чего вы мне задание копируете, я у вас уточнял, сумма положительных или сумма целых?

YoBa · 14.12.2011, 20:28

сумма положительных

14.12.2011, 17:40	#1
YoBa Регистрация: 14.12.2011 Сообщений: 6	Две задачки с циклом 1. Найти сколько слагаемых необходимо, чтобы сумма 3+7+11+15+… оказалась больше 100. 2. С клавиатуры вводятся целые числа. Определить количество положительных, как только их сумма превысит 10.

14.12.2011, 17:45	#2
Arigato Высокая репутация СуперМодератор Регистрация: 27.07.2008 Сообщений: 15,592	А от нас вы чего хотите-то? E-Mail: arigato.freelance@gmail.com

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Две задачки	strannik23	Паскаль, Turbo Pascal, PascalABC.NET	0	05.04.2011 10:53
Две задачки	Scooby_Doo	Паскаль, Turbo Pascal, PascalABC.NET	4	16.12.2010 20:32
две задачки	agressenok	Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM	8	04.12.2010 15:08
две задачки.	kardinal94	Помощь студентам	1	01.12.2010 11:52
две задачки на С#	Bobrik	Помощь студентам	0	01.06.2009 23:50

14.12.2011, 17:47	#3
YoBa Регистрация: 14.12.2011 Сообщений: 6	Как решить то

14.12.2011, 18:01	#4
YoBa Регистрация: 14.12.2011 Сообщений: 6	кто может помогите

14.12.2011, 18:16	#6
YoBa Регистрация: 14.12.2011 Сообщений: 6	Первую можно расписать а то не очень понятно а во второй определить количество положительных, как только их сумма превысит 10

14.12.2011, 20:28	#8
YoBa Регистрация: 14.12.2011 Сообщений: 6	сумма положительных