1.
var x, i: integer;
var c : array[1..31] of boolean;
begin
c := 0;
for i:= 1 to 31 do c[i] := false;
for i := 1 to 31 do begin
readln(x); if (x = 0) then c[i] := true;
end;
writeln('В следующие дни не было осадков: ');
for i:= 1 to 31 do if (c[i]) then writeln(c[i]);
readln(i);
end.
2.
var x,i,n,c: integer;
begin
realn(n);
for i:= 1 to n do
begin
readln(x); if (x < 0) then c := c + x;
end;
writeln('Ответ: '); write(c);
readln(x);
end.
P.S. На паскале не писал давно. Код не компилировал (ибо его сюда копипастить без последствий нельзя.), так что могут быть незначительные ошибки. + сразу говорю (как программист с некоторым опытом и будучи уже не школьником) - код го*но. Так никто не делает, так никто не пишет, но для "школьного паскаля" достаточно
Допускаем, что логические значения двоичные: 0 и 1. Тогда код такой:
javascript:var a=prompt("a = "),b=prompt("b = ");alert(a^b);
Ответ:
print("кол-во купе")
n = int(input()) #купе
a = [] #места
print ("кол-во одиночек")
one = int(input())
print ("кол-во двоек")
two = int(input())
print ("кол-во троек")
three = int(input())
for i in range(n):
k=0
print ("Кол-во мест в",i+1," купе:")
while k<1 or k>4:
k=int(input())
if(k<1 or k>4):
print("Число мест от 1 до 4!!!")
a.append(k)
l = 0
for i in range(len(a)):
if a[i]>=3:
l = l+1
a[i] = a[i]-3
if l == three:
break
print(l,"тройки")
print(a)
j = 0
for i in range(len(a)):
if a[i]>=2:
j = j+1
a[i] = a[i]-2
if j == two:
break
print(j,"двойки")
print(a)
m = 0
for i in range(len(a)):
if a[i]>=1:
m = m+1
a[i] = a[i] - 1
if m == one:
break
print(m,"одиночки")
print(a)
if l>=three and j>=two and m>=one:
print("YES")
else:
print("NO")
Объяснение:
надеюсь в коде разберешься )
написано в питоне
Резьбовое соединение.
Скрутка.
Соединение клеммами.
Соединение при помощи клеммной колодки.
Опрессовывание.
Пайка.
Использование заклепочника.
Бандажирование проводников.
Сварка жил.
Прокалывание проводников.