<span>7 - ответ ТААУТАТ
8 - ответ 8</span>
Uses GraphABC;
begin
Window.Height:=600;
Window.Width:=800;
var y:=10;
while y<Window.Height do begin
Line(10,y,790,y);
y+=10
end;
var x:=10;
while x<Window.Width do begin
Line(x,10,x,590);
x+=10
end;
Randomize;
Pen.Color:=clRed;
Pen.Width:=3;
x:=Window.Width div 2;
x:=10*Round(x/10);
y:=Window.Height div 2;
y:=10*Round(y/10);
MoveTo(x,y);
repeat
case Random(1,4) of
1:LineTo(PenX+10,PenY);
2:LineTo(PenX,PenY-10);
3:LineTo(PenX-10,PenY);
4:LineTo(PenX,PenY+10);
end;
Sleep(100);
until false;
end.
Ответ:
Смотри картинку
Объяснение:
1. НЕ А (значение обратно исходному)
А = 0 НЕ А = 1
А = 0 НЕ А = 1
А = 1 НЕ А = 0
А = 1 НЕ А = 0
2. А И В (истина (равно 1), когда оба высказывания истина (А = 1 и В = 1))
А = 0 В = 0 А И В = 0 И 0 = 0
А = 0 В = 1 А И В = 0 И 1 = 0
А = 1 В = 0 А И В = 1 И 0 = 0
А = 1 В = 1 А И В = 1 И 1 = 1
3. НЕ А И В (истина (равно 1), когда оба высказывания истина (НЕ А = 1 и В = 1))
НЕ А = 1 В = 0 НЕ А И В = 1 И 0 = 0
НЕ А = 1 В = 1 НЕ А И В = 1 И 1 = 1
НЕ А = 0 В = 0 НЕ А И В = 0 И 0 = 0
НЕ А = 0 В = 1 НЕ А И В = 0 И 1 = 0
4. (А И В) ИЛИ (НЕ А И В) (ложь (равно 0), когда оба высказывания ложь ((А И В) = 0 и (НЕ А И В) = 0))
А И В = 0 НЕ А И В = 0 (А И В) ИЛИ (НЕ А И В) = 0 ИЛИ 0 = 0
А И В = 0 НЕ А И В = 1 (А И В) ИЛИ (НЕ А И В) = 0 ИЛИ 1 = 1
А И В = 0 НЕ А И В = 0 (А И В) ИЛИ (НЕ А И В) = 0 ИЛИ 0 = 0
А И В = 1 НЕ А И В = 0 (А И В) ИЛИ (НЕ А И В) = 1 ИЛИ 0 = 1
Ответ:
Объяснение:-взять арбуз
-взвесить его на весах
-взять (70*масса арбуза) тенге у покупателя
-дать арбуз покупателю