сервис вопросов и ответовввести с клавиатуры массив из 5 элементов,найти среднее арифметическое всех элементов массива?
10-11 класс|
|
Danil1994rustam
05 нояб. 2013 г., 0:04:35 (10 лет назад)
TANJA71
05 нояб. 2013 г., 1:25:17 (10 лет назад)
uses crt;
const n=5;
var a: array[1..n] of integer;
i , s: integer;
begin clrscr;
s:=0;
for i:=1 to n do
begin
read(a[i]);
s:=s+a[i];
end;
writeln('Среднее арифмитическое = ', s/5:3:1);
readln;
end.
Ответить
Другие вопросы из категории
Составить приложение на языке Pascal. Вычислить на ПК значения функции, заданной в таблице. На печать
вывести значения вводимых исходных данных и полученные результаты,
сопровождая их именами переменных. Значения аргумента взять из
указанного диапазона так, чтобы протестировать все ветви программы.
Дана последовательность, содержащая от 2 до 30 слов, в каждом из от 1 до 8 символов строчных латинских букв между соседними словами-не менее одного
пробела, за последним словом-точка. Составить программу на языке Паскаль
1) Все слова, которые встречаются в последовательность по одному разу
Читайте также
1)ввести с клавиатуры массив из n элементов вывести на экран элементы меньшие среднего арифметического всех элементов массива
2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент
1)дан одномерный массив из 5 элементов.найти сумму положительных элементов. 2)Дан одномерный массив из 7
элементов.Найти колличество четных положительных элементов.
3)Дан массив из 6 элементов.Найти произвдение положительных из них.
СДЕЛАЙТЕ БЛОК-СХЕМУ И НАПИШИТЕ ПРОГРАММУ ДЛЯ ДАННОЙ ЗАДАЧИ:
Ввести с клавиатуры массив из 5 элементов, найти минимальный из них.
ввести с клавиатуры массив из 5 элементов найти минимальный из них 4 15 3 10 14
напишите пожалуйста в паскале
Вы находитесь на странице вопроса "ввести с клавиатуры массив из 5 элементов,найти среднее арифметическое всех элементов массива?", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.