сервис вопросов и ответовнаписать программу в паскале мясокомбинат получал 6 дней мясо. определить среднее арифметическое количества мяса полученного за эти дни и найти количество
10-11 класс|
|
дней когда мясокомбинат получал мяса меньше среднего арефметического
Elinochka1925
05 мая 2014 г., 7:59:19 (10 лет назад)
Aleksandrkruglov
05 мая 2014 г., 9:37:12 (10 лет назад)
program pr; var a:array[1..6]of real; i,kol:integer; sr_ar:real; begin for i:=1 to 6 do begin readln(a[i]); sr_ar:=sr_ar+a[i]; end; sr_ar:=sr_ar/6; writeln(sr_ar); for i:=1 to 6 do begin if(a[i]<sr_ar) then kol:=kol+1; end; writeln(kol); end.
держи, п.с. везет вам, проги на дом писать задают), у нас практической части почти нет(
удачи!
печенька1свободы
05 мая 2014 г., 12:34:16 (10 лет назад)
ну помогите
123456yulya123
05 мая 2014 г., 14:54:42 (10 лет назад)
написать программу в паскале задан массив В(15). найти сумму элементов больших 0
Ответить
Другие вопросы из категории
ИНФОРМАТИКА!!!
Написать программу определения числа билетов с 6-значными номерами,у которых сумма первых 3 десятичных цифр равна сумме 3 последних десятичных цифр (ПАСКАЛЬ)
Определите,какое число будет напечатано в результате работы следующей программы
Алгоритмический язык
нач
цел а, b
a :=56
b :=a-70
нц пока не (b>0)
b :=b+13
кц
нц пока mod(a,b)<>0
a :=a-4
кц
вывод а
кон
помогите срочно надо!!!
1. Что такое право пользования?
2. Какие юридические документы составляют нормативно-правовую основу мер по защите авторских прав?
Var x,y:integer;
function nod(x:integer):Longint;
begin
if x=0 then nod:=1
else nod:=nod(x-1)*x
поясните последние две строчки плз
Читайте также
1.тема циклы со сщетчиком.Написать программу в паскале для ввода с клавиатуры 15 чисел и вывода номеров отрицательных элементов.
2.написать программу в паскале
f(x)=2(sin*sin)x+1
Помогите написать программу в паскале. Задание:На плоскости даны 2 точки А (х1; у2) и В (х2; у2), определить какая из них находится дальше от начала коо
рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу
Написать Программу в паскале которая посчитала бы 5^123 (это цикл как бы должен быть)
http://primat.org/index/0-128 вот сайт что бы написать программу.
Написать программу для Паскаль
Найдите среднюю температуру для дней, когда температура поднималась выше 0 градусов, и определите количество таких дней. Программа получает на входе количество дней, в течение которых проводилось наблюдение, затем для каждого дня вводится температура.
Помогите написать программу по Информатике! Найти произведение двузначных нечетных чисел, кратных
13.
Нужно написать программу на цикле с предусловием, на Паскале.
Вы находитесь на странице вопроса "написать программу в паскале мясокомбинат получал 6 дней мясо. определить среднее арифметическое количества мяса полученного за эти дни и найти количество", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.