Категория
Информатика, опубликовано 06.06.2020 23:33

ПИТОН 60бал
Определите среднее арифметическое элементов последовательности, завершающейся числом 0. Число 0 в последовательность не входит. Числа, следующие за нулем, считывать не нужно.
Входные данные
Вводится последовательность целых чисел. Ввод завершается, когда будет введено число 0.
Выходные данные
Выведите одно число - среднее арифметическое элементов последовательности

Ответы

Ответ
Ответ оставил: Гость
Sub aaa()
    n = CInt(InputBox("n="))
    x = CDbl(InputBox("x="))
    sx = Cos(x)
    s = sx
    For i = 2 To n
        sx = Cos(sx)
        s = s + sx
    Next i
    MsgBox s
End Sub
Ответ
Ответ оставил: Гость
Хуйвыввввввввырр рпаври рнввлд
Ответ
Ответ оставил: Гость
Var x, y: integer;
begin
readln(x);
if x>=6 then
y:=sqrt(sqr(x)-4*x)
else
y:=2*x+8;
writeln(y);
end.
Ответ
Ответ оставил: Гость
128=2^{7}
для кодирования 1 символа требуется 7 бит.
30 симв.=210 бит.


Другие вопросы по информатике

Вопрос
Информатика, опубликовано 09.01.2019 16:01
✅ Ответов: 1 на вопрос по информатике: ПИТОН 60бал Определите среднее арифметическое элементов последовательности, завершающейся числом 0. Число 0 в последовательность не входит. Числа, следующие за нулем, считывать не нужно. Входные данные Вводится последовательность целых чисел. Ввод завершается, когда будет введено число 0. Выходные данные Выведите одно число - среднее арифметическое... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube