Ответ:
x>6
Объяснение:
(x>6) ∧ НЕ(x<2) = (x>6) ∧ (x≥2)= x>6
Вроде как то так)Только можно линии толще сделать
<span>(2400 *8) бит : 8 бит = 2400 пикселей
</span>
Program p1;
Var a: integer;
Begin
a:=5+5*5;
Writeln('Ответ: ', a);
End.
1.
var k, l, m, n: integer;
begin
readln(k,l,m,n);
if (k+l+m+n mod 2 = 0) then
writeln('поля одного цвета')
else
writeln('поля разных цветов')
end.
2.
uses crt; {В зависимости от компилятора эта строчка может оказаться лишней}
var question, answer: integer;
begin
randomize();
question := random(100);
writeln(question);
readln(answer);
if (question+answer=100) then
writeln('Not bad')
else
writeln('Oops. Right answer is ', 100-question)
end.