• 
  • 18 May 2011
  Английский язык
  • Автор: Глобальная

  

  Имеется ряд из N лампочек, которые пронумерованы от 1 до N. Изначально ни одна из лампочек не горит. Далее происходит K последовательных линейных инверсий этого ряда ламп. Под линейной инверсией понимается инверсия каждой P-й лампочки в ряде. Например, если P=3, то произойдет инверсия 3й, 6й, 9й и т.д. лампочек.

  Требуется определить: сколько горящих лампочек останется после реализации всех заданных линейных инверсий?

  написать рабочую прогу на паскале

• 
  • 18 May 2011
  • Ответ оставил: Nelli499

  program xxx;
  var i, j, k, n, p, s : integer;
      a : array [1..20] of integer;
  begin
    write ('введите количество инверсий -');
    readln(k);
    write ('введите количество ламп -');
    readln(n);
    for i:=1 to n do
      a[i]:=0;
    for i:=1 to k do
      begin
        write ('введите инверсию P-');
        readln(p);
        j:=p;
        while j<=n do
          begin
            if a[j]=0 then a[j]:=1 else a[j]:=0;
            j:=j+p
          end
      end;
    s:=0;
    for i:=1 to n do
      if a[i]=1 then s:=s+1;
    write ('Ламп горит -', s);
    readln
  end.

  0
• 
  • НЕ НАШЛИ ОТВЕТ?

  Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предмету школьной программы: английский язык.
  На сегодняшний день (02.07.2025) наш сайт содержит 244794 вопросов, по теме: английский язык. Возможно среди них вы найдете подходящий ответ на свой вопрос.

  Найти другие ответы
• Нажимая на кнопку "Ответить на вопрос", я даю согласие на обработку персональных данных

  Ответить на вопрос

Последние опубликованные вопросы