Массив вводим с клавиатуры или иного устройства ввода.
Создание программы для нахождения среднего арифметического + вывод среднего арифметического на экран.
i - цикловая переменная
sra - среднее арифметическое всех элементов массива
s - сумма всех элементов массива
var
А:array [1..30] of real;
i:integer;
sra,s:real;
begin
s:=0;
for i:=1 to 30 do
begin
readln (a [ i ]);
s:=s+a[i];
end;
sra:=s/30;
writeln (sra)
end.
Лат. carne vale, «прощай, мясо» либо лат. car val — «корабль шутов»
Var
y: real;
begin
y := tan(3 * Pi);
y := y * y; {квадрат}
y := y * y; {четвертая степень}
y := (1 - y) / (ln(8) / ln(3));
writeln('y=', y)
end.
Ну 10*100=1000 бит, а т.к. 8 бит = 1 байт, то 1000/8=125 байт.
Операционная эффективность – это повышение качества продукции при одновременном снижении затрат, т.е. операционная эффективность - это эффективность использования внутренних ресурсов компании.