Используем закон де Моргана, закон двойного отрицания, идемпотентность. Получаем A+B. Подробное решение во вложении.
Какие именно? Электрические или обычные?
Если простые чайники то из Стали нержавейки
А электрические разные бывают
<em>VAR </em>
<em> k: LongInt;</em>
<em>BEGIN </em>
<em> k := 50; </em>
<em> While (k < 1000) do begin </em>
<em> k := k + 50; Write(k, ' ');</em>
<em> End;</em>
<em>END.</em>
<em>VAR </em>
<em> sum, k: LongInt;</em>
<em>BEGIN </em>
<em> k := 101; sum := 0; </em>
<em> While (k < 150) do begin </em>
<em> sum := sum + k; </em>
<em> k := k + 2; </em>
<em> End; </em>
<em> Writeln(sum);</em>
<span><em>END.</em></span>