У нас есть 4 выключателя, расположенных последовательно в ряд. Каждый может находится в одном из двух положений - выключено (обозначается нулем) и включено (обозначается единицей). Свет включается, если включены хотя бы два выключателя, притом если включены два, то они не должны находиться рядом. программа на с++

Формат ввода

Вводятся четыре числа, каждое из которых равно 0 или 1.

Формат вывода

Требуется вывести YES, если свет загорится и NO в противном случае.

Пример 1

Ввод

Вывод

1 0 1 0

YES

Пример 2

Ввод

Вывод

0 0 1 1

NO

Пример 3

Ввод

Вывод

1 0 0 1

YES

Program MashaLukianova;
uses crt;
const n=12;
var
  mas:array[1..n] of integer;
  b,i,left,right,temp:integer;
begin
  writeln('*** alphaues is thinking... ***');
  writeln('***          OK             ***');
  writeln();
  write('Введите загадочное число B ');
  readln(b);
  writeln('Элементы массива:');
  {создание и вывод начального массива}
  randomize;
    for i:=1 to n do
      begin
        mas[i]:=random(100)-50;
        write (mas[i]:4);
      end;
  writeln();
  left:=0;
  right:=n;
  while left <> right do         {просматриваем массив с концов к середине, пока "левый" и "правый" текущие элементы не встретятся}
    begin
      if mas[left+1]<=b then

        {если текущий "левый" элемент меньше или равно В, то просто идём смотреть следующий }
        begin
          left:=left+1;
        end
        else
          if mas[right]>=b then
        {если текущий "правый" элемент больше или равно В, то просто идём смотреть следующий }

            begin
              right:=right-1;
            end
          else

        {иначе меняем "левый" и "правый" местами}
            begin
              temp:= mas[left+1];
              mas[left+1]:=mas[right];
              mas[right]:=temp;
              left:=left+1;
              right:=right-1;
            end;
    end;
  writeln();
  {вывод массива-результата}
  for i:=1 to n do
      begin
        write (mas[i]:4);
      end;
  writeln();
end.

Смотря для какого тебе языка надо, вот для VisualBasic

Sub Neskolko_Chisel

Dim Sum, i, a, N As Integer

N = InputBox("Введите количество чисел")

For i = 1 to N

a = InputBox("Введите число")

Sum = Sum + a

Next i

End Sub

вот для с++

#include <iostream>
#include <conio.h>
using namespace std;

int main()
{
setlocale(LC_ALL, "Russian");

int a, N, Sum, i;
Sum = 0;
N = 0;
a= 0;
cout << "Введите количество чисел! ";
cin >> N;

for (i = 1; i <= N; i++)
{
cout << "Введите число!" ;
cin >> a;
Sum = Sum + a;
}
cout << Sum;

_getch();
}