profile
Размещено 5 лет назад по предмету Информатика от SkyLine07

Решите три задачи разными операторами цикла: (pascal abc)
1. Дана последовательность натуральных чисел, заканчивающаяся нулем. А также найти среднее арифметическое данной последовательности чисел, 0 при этом не учитывается.
2. Найти сумму всех чисел Фибоначчи, не превосходящих заданного натурального числа N.
3. Дано действительное число n>1. Получить наибольшее число вида 2^n (2 в степени n), не превосходящее n.

  1. Ответ на вопрос
    Ответ на вопрос дан guslyakov98vaddam
    program zadanie1 (input, output);
    var a, b:integer;
    s:real;
    begin
    a:=1;
    s:=0;
    b:=0;
    while a <> 0 do
    begin
    read (a);
    s:=s+a;
    b:=b+1;
    end;
    s:=s/(b-1);
    writeln (s);
    end.
    -------------------------------------------------------------
    program zadanie2 (input, output);
    var a, p, b, c, n, s:integer;
    begin
    a:=1;
    b:=0;
    c:=0;
    s:=0;
    read (n);
    repeat
    c:=a+b;
    b:=a;
    a:=c;
    s:=s+c;
    if s < n then
    p:=s;
    until s > n;
    writeln (p);
    end.
    --------------------------------------------------
    program zadanie3 (input, output);
    var n, I:integer;
    a, b:real;
    begin
    read (n);
    a:=0;
    for I:=0 to n do
    begin
    a:=exp(I*ln(2));
    if a < n then
    b:=a;
    end;
    writeln (b);
    end.
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 6 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.