//Pascal
//Числа случайные в диапазоне [-10;10]
var
A: array [1..15] of integer;
i: byte;
mult: longint;
begin
mult := 1;
randomize; //В PascalABC.NET можно убрать
for i := 1 to 15 do
begin
A[i] := random(21)-10;
if i mod 2 = 0 then mult := mult * A[i];
write(A[i], ' ');
end;
writeln;
writeln('Произведение элементов на четных местах = ', mult);
readln;
end.
Після роздумів щодо подальшого напряму розвитку сайту - як інтернет-каталог або блог, вирішили зробити прайс-лист товарів в форматі xls, який оновлюється по мірі надходження або продажу товарів, а на самому сайті будуть публікуватися статті на різні комп'ютерні (і не тільки) теми.
Щодо першої теми, то обрати було не складно, адже по роботі частенько доводиться стикатися з незнанням будови персонального комп'ютера (ПК) - системний блок називають процесором і т.п.
Для простоти наведено малюнок з основними деталями персонального комп'ютера.

Основними складовими стаціонарного персонального комп'ютера є системний блок, монітор, клавіатура і мишка, а також колонки (навушники).
Монітор і колонки - це пристрої виведення інформації, а клавіатура і мишка - це пристрої введення інформації. Ці пристрої ще називають периферійними. Основна задача периферійних пристроїв - введення інформації в комп'ютер (натискання клавіш на клавіатурі, рух курсору мишкою) і подальше виведення результатів у зрозумілому для людини вигляді (зображення на екрані, відтворення звуків на колонках).
Ответ:
2,0,334
Объяснение:
Описываем две пользовательские функции в Excel VBA:
Function newstr(str As String, n As Integer) As String
Dim i As Integer
For i = 1 To n
str = Replace(str, "a", "ab")
str = Replace(str, "bb", "c")
Next
newstr = str
End Function
Function chrcount(str1 As String, str2 As String) As Integer
Dim str() As String
str = Split(str1, str2)
chrcount = UBound(str, 1)
End Function
С рабочего листа вызываем функцию:
= chrcount(newstr("abab"; 333); "a")&","&chrcount(newstr("abab"; 333); "b")&","&chrcount(newstr("abab"; 333); "c")
Получаем результат:
2,0,334
Всё что нам нужно это просто поделить количество яблок на количество школьников т.е. k/n - тогда мы получим результат, решение прикрепил скриншотом.