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

1. Вводится не менее восьми чисел. Конец ввода 0. Найти сумму первых пяти чисел и произведение последних пяти чисел. Составить блок-схему и программу к задаче.
2. Вводится текст. Конец ввода F4. Найти количество букв.

  1. Ответ на вопрос
    Ответ на вопрос дан Аккаунт удален
    const
      n = 5;//Емкость памяти типа "кольцо"

    type
      Ring = array[1..n] of integer;

    var
      ir: integer;
      R: Ring;

    procedure Add2Ring(a: integer);
      // Добавляет в кольцо очередной элемент
    begin
      if ir = n then ir := 1
      else ir := ir + 1;
      R[ir] := a
    end;

    var
      i, S, d: integer;
      P: longint;

    begin
      S := 0;
      ir:=0;
      writeln('Вводите числа, 0 - конец ввода');
      for i := 1 to n do
      begin
        readln(d);
        S := S + d;
        Add2Ring(d)
      end;
      repeat
        readln(d);
        if d <> 0 then Add2Ring(d);
      until d = 0;
      P := 1;
      for i := 1 to n do P := P * R[i];
      writeln('Сумма первых ', n, ' чисел: ', S, ', произведение последних: ', P)
    end.

    1. Ответ на вопрос
      Ответ на вопрос дан Аккаунт удален
      Так что после окончания ввода последние n=5 чисел будут находиться в "кольце". А ir - это указатель на последний заполненный элемент кольца. Например, если ir=2, то по порядку були заполнены элементы 3, 4, 5, 1, 2.
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 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) их не спросили

Информация

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