самый большой авал это будет танцоры. поменьше актёры,а самый маленький авал певцы. 2 элемента
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\";
ПОСТ
A = 5;
B = 10;
ПЕР
C, V: ЦЕЛ;
УКАЗ
C := 16;
ПОКА C >= 3 ВЫП
V := A * B * C;
Вывод.ЧЦел("%d; ", V, 0, 0, 0);
УМЕНЬШИТЬ(C, 1)
КОН;
C := 16;
ПОВТОРЯТЬ
V := A * B * C;
Вывод.ЧЦел<span>("%d; ", V, 0, 0, 0);
</span> УМЕНЬШИТЬ(C, 1)
ДО C < 3;
ОТ C := 16 ДО 3 ПО -1 ВЫП
V := A * B * C;
Вывод.ЧЦел<span>("%d; ", V, 0, 0, 0)
</span> КОН
КОН Задание.
===== PascalABC.NET =====
begin
var a := ArrRandom(10, -99, 99);
a.Println;
a.Where(p -> p.IsOdd).Sum.Println
end.
<span>srednee:=(a+b)/2; наверное.
</span>