М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
hofferson
hofferson
02.05.2020 20:04 •  Информатика

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

Входные данные

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

Выходные данные

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

Примеры
Ввод
Вывод
1 0 1 0
YES
0 0 1 1
NO

👇
Ответ:
ZefirKa02
ZefirKa02
02.05.2020

n1=list(map(int, input().split()))

if n1==[1,0,1,0] or n1==[1,0,0,1] or n1==[0,1,0,1]:

       print('YES')

else:

       print ('NO')

Объяснение:

вроде, только в таких случаях будут выполнены все условия  

4,5(47 оценок)
Открыть все ответы
Ответ:
faiarina2016
faiarina2016
02.05.2020
1) program ex;
 var i:integer ;mas:array [1..10] of integer;
 begin 
  for i:=1 to 10 do   
  begin    
   mas[i]:=random(9)+1;    
   if (mas[i] mod 2)=0 then     
    mas[i]:=mas[i]+1;   
  end;
 end. 
2)program ex;
var i:integer ;mas:array [1..10] of integer;
begin 
 for i:=1 to 10 do   
 begin    
  mas[i]:=random(9)+1;    
  if (mas[i] mod 2)=0 then     
   mas[i]:=0;   
  else
   mas[i]:=mas[i]*3;
 end;
end.
3)program ex;
var i:integer ;mas:array [1..10] of integer;
begin 
 for i:=1 to 10 do   
 begin    
  mas[i]:=random(9)+1;    
  if (i mod 2)=0 then     
   mas[i]:=(mas[i]*mas[i]);   
 end;
end.
4)program ex;
var i:integer ;mas:array [1..10] of integer;
begin 
 for i:=1 to 10 do   
 begin    
  readln(mas[i]); 
  if (mas[i]<0) then     
   mas[i]:=mas[i]*(-1);   
 end;
end.
4,6(79 оценок)
Ответ:
ArtemTony
ArtemTony
02.05.2020
Program RLN; 
var x:byte; 
begin 
writeln('Введите число, чтобы узнать, какому месяцу оно соответствует:'); 
Readln(x); 
Case x of 
0: writeln('Такого месяца не существует'); 
1: writeln('Январь.'); 
2: writeln('Февраль.'); 
3: writeln('Март.'); 
4: writeln('Апрель.'); 
5: writeln('Май.'); 
6: writeln('Июнь.'); 
7: writeln('Июль.'); 
8: writeln('Август.'); 
9: writeln('Сентябрь.'); 
10: writeln('Октябрь.'); 
11: writeln('Ноябрь.'); 
12: writeln('Декабрь.'); 
13..1000: writeln('Такого месяца не существует.'); 
end; 
end. 
4,4(71 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ