в клетке "C6" должна быть формула:
= (B2+C2+D2)/3+(B3+C3+D3)/3+(B4+C4+D4)/3+(B5+C5+D5)/3)/4
как это рассчитать:
цена автобуса в Москве - 16, цена автобуса в Питере - 26, цена автобуса в Казане - 16 чтобы узнать среднюю цену автобуса в этих городах сложим эти цифры и разделим эту сумму на их количество, то есть: (26 + 24 + 16)/2 = 33 (средняя цена за поездку на автобусе)
в excel это пишем так (B2+C2+D2)/3
теперь вычисляем среднюю цену остальных транспортов
(26 + 24 + 16) / 3 = 22 (автобус)
(23 + 20 + 12) / 3 = 18,333 (троллейбус)
(20 + 18 + 12) / 3 = 20 (трамвай)
(30 + 22 + 18) / 3 = 35 (метро)
закончили? и теперь нам нужно найти среднюю цену за поездку всех транспортов для этого для этого суммируем цену остальных транспортов 22 + 18,333 + 20 + 35 и делим это на 4 (так количество транспортов 4) в итоге получаем среднюю цену за поездку в городе то есть: 20, 0833
ответ: =(B2+C2+D2)/3+(B3+C3+D3)/3+(B4+C4+D4)/3+(B5+C5+D5)/3)/4
const n=20;
var a:array [1..n] of integer;
i,max,maxi,min,mini:integer;
begin
write('Массив: ');
for i:= 1 to n do
begin
a[i]:=random(101)+50;
write (a[i],' ')
end;
max:=a[1];
maxi:=1;
min:=a[1];
mini:=1;
for i:= 1 to n do
begin
if a[i]>max then
begin
max:=a[i];
maxi:=i
end;
if a[i]<min then
begin
min:=a[i];
mini:=i
end
end;
writeln;
writeln('Максимальный элемент ',max,' и его номер ',maxi);
writeln('Минимальный элемент ',min,' и его номер ',mini)
end.
Или (если max или min элемент будет не один)
const n=20;
var a:array [1..n] of integer;
i,max,min:integer;
begin
write('Массив: ');
for i:= 1 to n do
begin
a[i]:=random(101)+50;
write (a[i],' ')
end;
max:=a[1];
min:=a[1];
for i:= 1 to n do
begin
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i]
end;
writeln;
for i:= 1 to n do
begin
if a[i]=max then writeln('Максимальный элемент ',max,' и его номер ',i);
if a[i]=min then writeln('Минимальный элемент ',min,' и его номер ',i)
end
end.
Створити масив дійсних чисел від 1 до 5. Знайти мінімальне та максимальне значення. Знайти сумму мінімального та максимального значення.
Объяснение:
0 строка - оголошення процедури
1 строка - оголошення зміних та надання їм типу цілих чисел
2 -оголошення масиву
3- оголошення змінних та надання їм типу дійсних чисел
4-початок
5-
6-цикл з лічильником та присовення знінній і значення 0
7-перетворення масиву у з рядкового типу у дійсний
8-
9-цикл з лічильником та присовення змінній і значення 1
10-перетворення з рядкового типу у цілі числа
11- перетворення з дійсного типу у рядковий
12-кінець
13-
14-присвоення змінній значення
15-присвоення змінній значення
16-присвоення змінній значення
17-цикли з лічильником та присвоення змінній і значення 2
18-умова при виконанні якої max:=А[i]
19-
20-цикли з лічильником з присвоєнням змінній і значення 1
21-умова при виконанні якої min:=А[i]
22-
23-
24-кінець
25- присвоєння рядкового типу
26-
27-знаходження сумми
28-
29-присвоєння рядкового типу
30-
31-кінець