сервис вопросов и ответовДана последовательность чисел, вводимых с клавиатуры и оканчивающаяся нулем. Составьте программу вычисления: a. суммы
10-11 класс|
|
всех чисел последовательности;
b. среднего арифметического всех чисел последовательности:
c. суммы только отрицательных и суммы только положительных чисел последовательности.
Efimoto123
09 дек. 2016 г., 12:12:01 (7 лет назад)
Apti9966
09 дек. 2016 г., 14:09:45 (7 лет назад)
Ввод нуля означает завершение ввода(он нигде не учитывается)
program test;
var sum, x, counter, sumOfNegative, sumOfPositive: integer; average: real;
begin
sum:=0;
average:=0;
counter:=0;
sumOfPositive:=0;
sumOfNegative:=0;
read(x);
while x <> 0 do
begin
sum:=sum+x;
average:=average+x;
counter:=counter+1;
if x > 0 then
sumOfPositive:=sumOfPositive+x
else
sumOfNegative:=sumOfNegative+x;
read(x);
end;
average:=average/counter;
writeln('Sum = ', sum);
writeln('Arithmetic average = ', average);
writeln('The sum of positive numbers = ', sumOfPositive);
writeln('The sum of negative numbers = ', sumOfNegative);
readln;
end.
Ответить
Другие вопросы из категории
Решить в паскале.
max {x+y+z; x*y+z; x^2+y^2-z}
min {x+y+(2/2); x*y*z} +1
МАССИВ...........1. Задайте случайным образом массив от 0 до 100, состоящий из 10 элементов. 2. Подсчитайте количество элементов массива,
удовлетворяющих условию:<20 и >50
3. Найдите сумму этих элементов.
Читайте также
1)Найдите сумму натуральных нечетных чисел не превышающих n!!!!Это нужно сделать циклом for. 2) Составьте программу,которая производит
суммирование произвольного количества целых чисел вводимых с клавиатуры.Концом последовательности служит ввод отрицательного числа.Программу составьте двумя способами: использую цикл с предусловием и цикл с постусловием
1)составьте программу вычисления суммы чисел в диапазоне от 45 до 115 45+....+115
2)Составьте программу которая выводит на экран числа кратные 2 и 13 в диапазоне от 2 до 150
3)Дано вещественное число А и целое число N(>0).Испульзуя один цикл вывести все целые степени числа А от 1 до N
------------------------ОПЕРАТОР WHILE
Составить программу Дан массив натуральных чисел , размерность -12 !) Заполнение массива производить с клавиатуры 2) Вывести на печать
только элементы кратные 2
3)Найти сумму первых пяти элементов
Составить программу Дан массив целых чисел , размерность -12
1) Заполнение массива производить случайными числами из диапозона [-10;35]
2)Вывести на печать только положительные элементы
3)Найти количество отрицательных элементов
Составить программу
Известны данные о выпуске прождукции ( ткани в метрах ) ткацким цехом текстильного комбината за каждый день месяца . Определить количество ткани ( метров) произведенных цехом за месяц .
Помогите пожалуйста! Дана последовательность чисел: 10 20 30...1000
Составьте алгоритм и программу нахождения суммы чисел этой последовательности
Дана последовательность чисел 0, 0, 1,
1, 2, 4, 7, 3, 4, 4 … , каждый элемент этой последовательности, начиная с
четвёртого равен последней цифре суммы трёх предыдущих элементов. Найдите
значение 1400-го элемента этой последовательности.
Ответ: ______________
Вы находитесь на странице вопроса "Дана последовательность чисел, вводимых с клавиатуры и оканчивающаяся нулем. Составьте программу вычисления: a. суммы", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.