Информатика. Экзамен по билетам, нужна помощь - Форум


Корейская косметика
Информатика. Экзамен по билетам, нужна помощь
  • bhzmzlzoc
    May 2011 +1 -1
    Сообщений: 2
    пожалуйста, помогите решить следующие задачи, а то в понедельник уже экзамен

    1.Построить алгоритм и составить программу на языке программирования для вычисления выражения 1^к+2^к+…+n^к , где n,k - натуральные числа.

    2. Составить программу перевода десятичного числа N в двоичную систему счисления. Проверить программу на тестах при разных вариантах значений исходных данных.
    Пояснение:
    Вариант 1. N = 613. Массив результата:
    1 2 3 4 5 6 7 8 9 10
    1 0 0 1 1 0 0 1 0 1
    Вариант 2. N = 5. Массив результата:
    1 2 3 4 5 6 7 8 9 10
    0 0 0 0 0 0 0 1 0 1
    Вариант 3. N = 1023. Массив результата:
    1 2 3 4 5 6 7 8 9 10
    1 1 1 1 1 1 1 1 1 1

    3.Построить алгоритм с реализацией на языке программирования. Дано натуральное число N. Вычислить: S=2!+3!+....+N! Проверить программу на тестах при разных вариантах значений исходного числа N.

    4.Построить алгоритм с реализацией на языке программирования Дан массив чисел. Найти значение максимального элемента. Если таких элементов несколько, то определить, сколько их. Проверить программу на тестах при разных вариантах значений исходных данных.

    5.Решить задачу с использованием электронной таблицы для изменяющихся начальных данных. В банк внесён вклад размером N под Р % годовых. Определить ежегодный прирост вклада и величину вклада на протяжении 10 лет. Изменить начальные данные и проследить как изменятся результаты.
  • sh1tdown
    May 2011 +1 -1
    Сообщений: 80
    #include
    using namespace std;
    void main() {int k,n; cin << k << n; cout >> k*(1+n)*n/2;}

    1 задача
  • bhzmzlzoc
    May 2011 +1 -1
    Сообщений: 2
    спасибо большое)
    но решать задачи нам на паскале сказали...
  • mad1gmad1g
    May 2011 +1 -1
    Сообщений: 452
    1)
    readln(n,k);
    for i:=1 to n do
    for j:=1 to k-1 do
    summ:=summ+n*n;

    2) Не понятно условие, надо в массив на 10 элементов записать? Если да, то вот ответ.
    k:=10;
    readln(N);
    while N>1 do
    Begin
    a[k]:=N mod 2;
    N:=N div 2;
    k:=k-1;
    End;
    a[1]:=1;
    Если просто вывести на экран, можно так:
    readln(N);
    while N>1 do
    Begin
    S:=N mod 2+S;
    N:=N div 2;
    End;
    writeln(S);

    Лень дальше читать даже, ушёл спать:)
  • NeveruNeveru
    May 2011 +1 -1
    Сообщений: 70
    sh1tdown said:

    #include
    using namespace std;
    void main() {int k,n; cin << k << n; cout >> k*(1+n)*n/2;}
    1 задача


    1) стрелки в другие стороны :D
    2) Что это за формула вообще?
    Ввод 2 2
    Вывод 5 (1+4)

    у вас же 6 (2*3*2/2)

    1. http://pastebin.com/cFgNFyAe
    3. http://pastebin.com/VdnwaEGz
    4. http://pastebin.com/X7cCKTFe
    5. http://pastebin.com/TdzhmWsN

    На Паскаль переведете сами