сервис вопросов и ответовНайдите среднее арифметическое 5 любых чисел. В паскале с оператором цикла for
5-9 класс|
|
Danilkapozd
02 июля 2014 г., 2:49:46 (9 лет назад)
Дария2002
02 июля 2014 г., 3:35:15 (9 лет назад)
Var n,sum,pr:real; i:integer;
Begin
Write('Введите 5чисел');
for i:=1 to 5 do begin
readln(n);
sum:=sum+n;
end;
pr:=sum/5;
Writeln('Среднее арифметическое чисел - ',pr);
end.
13012804
02 июля 2014 г., 6:06:56 (9 лет назад)
обязательно наличие цикла for?
25021999c
02 июля 2014 г., 6:58:50 (9 лет назад)
если он пишет что нужно с этим оператором, то обязательно
Ответить
Другие вопросы из категории
пользователь работал с каталогом D:\ПРОГРАММЫ\ИГРЫ\КВЕСТЫ. Сначала он поднялся на один уровень вверх, затем спустился в каталог СТРАТЕГИИ, после чего
спустился в каталог ФАРАОН. Каков полный путь к каталогу, в котором оказался пользователь?
Укажите характеристику векторного изображения:
А)Изображение строится из пикселей
В)Изменение размера происходит без потери качества
С)Каждая точка имеет свой цвет, яркость
D)Хранится цвет и оттенок каждой точки изображения
Битовая глубина цвета это:
A)Количество цветов в палитре
B)Общее количество цветов в изображении
C)Объем всего изображения
D)Количество бит для хранения информации о цвете 1 точки.
Битовая глубина измеряется
A)В байтах
B)В битах
C)В Кбитах
D)В Мбайтах.
Читайте также
Плиз срочно надо.1)Найдите правильную на языке паскаль запись выражения
19(16,3+7,7).а)19(16.3+7.7),в)19*(16.3+7.7).д)19(16,3+7.7).с)19*(16.3+7.7).2)Найдите правильную на языке паскаль записы выраженияа)34.5+24.5/15у в)(34.5+24.5)/15у с)(34.5+24.5)15*у.д)(34.5+24.5)/(15*у).3)Вычислите длину окружности и площадь круга одного и того же заданного радиуса R.4)Даны два числа.Найдите среднее арифметическое кубов этих чисел и среденее геометрическое модулей этих чисел.Два последних номера там нужно написать программу,программу присылать на листочке
Проблема с Паскалем. Мне надо посчитать среднее арифметическое всех отрицательных чисел в массиве из десяти элементов. Я понимаю, как сначала надо
распредилить, какие числа меньше нуля, но как вычислить среднее арифметическое, не зная точное кол-во отрицательных элементов? Желательно написать полной программой. Заранее спасибо с:
Напишите программу, которая в последовательности целых чисел находит среднее арифметическое чисел, кратных 9, или сообщает, что таких чисел нет.
Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не является членом последовательности). Количество чисел не превышает 100. Введённые числа по модулю не превышают 300. Программа должна вывести среднее арифметическое чисел, кратных 9, или вывести NO, если таких чисел в последовательности нет.
Составить программу в паскале: Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие
результаты.:
· Если первое из них отрицательно, а второе вдвое больше третьего, то выведите среднее арифметическое всех четырех чисел.
· Если произведение этих чисел больше их суммы, то выведите эти сумму и произведение.
· Если выполняются одновременно два перечисленных выше условия, то выведите среднее арифметическое этих чисел, их произведение и сумму
· Иначе, выведите удвоенные значения этих чисел
Вы находитесь на странице вопроса "Найдите среднее арифметическое 5 любых чисел. В паскале с оператором цикла for", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.