Var a:array [1..7] of integer; i,p:integer;
begin
a:=1;
for i:=1 to 7 do
begin
readln(a); p:=p*a;
end;
writeln('Произведение = ',p);
readln;
end.
Ответ:
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
Очень плохо видно, и какие именно столбцы, сделай фото крупнее
5 Кбайт = 5 * 1024 байт = 5120 байт (ответ А)
Ответ:
системное программное обеспечение-комплекс программ, я которые обеспечивают управление компонентами компьютерные системы, такими как процессор оперативная память устройства ввода, сетевое оборудование, выступая как МЕЖСЛОЙНЫЙ ИНТЕРФЕЙС, с одной стороны которого аппаратура, а с другой приложение пользователя. в отличие от прикладного программного обеспечения,системная не решает конкретные практические задачи, обеспечивает работу других программ.
СИСТЕМНЫЕ ПРОГРАММИРОВАНИЯ-создание системного программного обеспечения
СИСТЕМНЫЙ ПРОГРАММИСТ-программист, специализирующийся на системном программировании