Лабораторная работа №2. Вариант 1. Простые функции Excel.
2.1 Распределение работающих в УВД г.Казани.
Рассчитайте недостающие показатели по формулам, представленным ниже.
Продолжи-тельность стажа работы
xi Число работающих в УВД
fi Отработано человеко-лет
xifi Доля работников к общей численности работников, %
Wi Средняя арифметическая взвешенная
2 34
4 40
6 15
8 31
10 22
12 8
Итого
МИН
МАКС
Доля работников к общей численности работников
Средняя арифметическая взвешенная
Для расчета итоговых, минимальных и средних значений используйте встроенные функции СУММ, МИН, МАКС.
2.2 Случайные числа.
Напишите формулы для заполнения диапазона А1:A50 случайными действительными числами из отрезка [-4; 6], а диапазона B1:B50 - случайными целыми числами из отрезка [-10;60] (используйте функцию СЛЧИС и СЛУЧМЕЖДУ). Скопируйте значения указанных диапазонов в диапазоны D1:D50 и E1:E50.
В любые свободные ячейки напишите формулы:
1. сумму абсолютных величин чисел диапазона E1:E50 (используйте функцию ABS);
2. суммы трех наименьших элементов диапазона D1:E50 (используйте функцию НАИМЕНЬШИЙ).
Var
s,s1:string;
begin
readln(s);
if (s[1]='в') and (s[2]=' ') then
begin
delete(s,1,1);
s:='на'+s;
end;
if (s[1]='В') and (s[2]=' ') then
begin
delete(s,1,1);
s:='На'+s;
end;
while pos(' в ',s)<>0 do
begin
if (s[1]='в') and (s[2]=' ') then
begin
delete(s,1,1);
s:='на'+s;
end;if (s[1]='В') and (s[2]=' ') then
begin
delete(s,1,1);
s:='На'+s;
end;
s1:=s1+copy(s,1,pos(' в ',s)-1)+' на ';
delete(s,1,pos(' в ',s)+2);
end;
if (s[1]='в') and (s[2]=' ') then
begin
delete(s,1,1);
s:='на'+s;
end;
if (s[1]='В') and (s[2]=' ') then
begin
delete(s,1,1);
s:='На'+s;
end;
s:=s1+s;
writeln(s);
end.
Пример ввода 1:
запасти в зиму, приехать в год, приготовить в день, выпить лекарство в ночь
Пример вывода 1:
запасти на зиму, приехать на год, приготовить на день, выпить лекарство на ночь
Пример ввода 2(глубокие песни современной отечественной эстрады):
В в в в в в в в в в в в в в в в в в н.
Пример вывода 2:
На на на на на на на на на на на на на на на на на на н.