С объяснением:) 1) Найдите значение логического выражения, если x=-3, y=3, z=-5 и D=false...

Question

С объяснением:)
1) Найдите значение логического выражения, если x=-3, y=3, z=-5 и D=false
F:=not((x<0) and (y<0)) or ((z<-2) and D))<br> 2) Разработать алгоритм и программу линейной структуры.
a=lg|x+1|, y=∛5a²-3x², x=3; z=-4,972
3) Дан фрагмент программы:
a:=5; b:=8; c:=-2;
while(aЧему равно значение c=?
4) Дан фрагмент программы:
SetColor(red); Setfillstyle(1,2); SetBkcolor(15); Circle(200,200,50);
Каким цветом закрашена область, ограниченная ... (укажите код цвета)?
5) Дан фрагмент программы.
Var s:string; n:integer;
Begin s:='Досвидания'; n:=length(s); writeln('n='); end.
Чему равно значение n?

Comments

3 - не полное

---

2 - не понятное

---

все

---

исправил

---

D=false, вот это я не понял...

Answer 1

1) в расстановке скобок здесь ошибка, в решении показан один из возможных вариантов исправления этой ошибки:
F:=not((x<0) and (y<0)) or ((z<-2) and D) ⇒ <br>not((-3<0) and (3<0)) or ((-5<-2) and false) ⇒ <br>not(true and false) or (true and false) ⇒ not false or false ⇒ true or false ⇒ true

2) здесь тоже в условии что-то не то (z - лишняя переменная получается) и корень из чего извлекать - тоже непонятно
var x,a,y:real;
begin
x:=3;
a:=ln(abs(x+1))/ln(10);
y:=exp(ln(5)*(1/3))*a*a-3*x*x;
writeln('y = ',y);
end.
Результат:
y = -26.3801743600581

3)
a=5; b=8; c=-2;
aaaac=c+1=-2+1=-1
Ответ: c=-1

4)
SetColor(red); - устанавливается цвет рисования (красный)
Setfillstyle(1,2); - устанавливается стиль заливки (1 - заполнение текущим цветом, 2 - зеленый цвет)
SetBkcolor(15); - устанавливается цвет фона (15-белый; экран сразу же окрашивается в заданный цвет)
Circle(200,200,50); - рисуется окружность (центр 200, 200; радиус 50)
О какой области спрашивается - непонятно.

5)
n- длина строки s (количество символов в строке) n = 10 (пробела после 'До' нет)

Comments

Спасибо!)