Составить блок-схему и программу для решения задач.

⇐ Предыдущая 1 2 3 4 567 8 9 10 Следующая ⇒

№	Задание 1	Задание 2
	Вычислить сумму ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Найти сумму целых положительных чисел кратных 4 и меньших 60.
	Вычислить произведение ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Определить количество отрицательных и сумму положительных.
	Вычислить сумму ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Определить количество четных и произведение нечетных.
	Вычислить произведение ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Вычислить количество кратных 3 и сумму оставшихся.
	Вычислить сумму ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Определить количество положительных чисел, кратных 6 и меньших 70
	Вычислить произведение ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Вычислить произведение отрицательных и количество положительных
	Вычислить сумму ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Найти количество кратных 5 и произведение оставшихся
	Вычислить произведение ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Найти произведение кратных 3и больших 15
	Вычислить сумму ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Вычислить количество четных и сумму нечетных.
	Вычислить произведение ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Найти количество отрицательных и произведение положительных.
	Вычислить сумму ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Найти сумму кратных 7 и количество оставшихся
	Вычислить произведение ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Вычислить произведение четных и сумму нечетных
	Вычислить сумму ряда N чисел	Организовать с клавиатуры ввод N произвольных целых чисел. Найти количество кратных 3 и произведение оставшихся.

Пример 3. Вычислить среднее арифметическое n чисел. Ввод чисел организовать с клавиатуры.

Программа: Program SrAr; Var n,i:integer; a,s,sa:real; Begin Write('n=');Readln(n); s:=0; For i:=1 to n do begin Write('a=');Readln(a); s:=s+a; end; sa:=s/n; Writeln('sa=',sa:5:3); Readln; End.

Блок-схема:

Так как шаг параметра цикла i равен единице, то для организации цикла была использована циклическая конструкция For.

⇐ Предыдущая 1 2 3 4 567 8 9 10 Следующая ⇒

Не нашли, что искали? Воспользуйтесь поиском:

vikidalka.ru - 2015-2024 год. Все права принадлежат их авторам! Нарушение авторских прав | Нарушение персональных данных