Var s:integer;
begin
s:=2*3+4*4*4*4*4;
writeln('s = ',s);
end.
Результат:
<span>s = 1030</span>
(a-c^2*c) /(sgrt(z)+7) -2 ответ a)
{1}
var a,b,n:integer; c:real;
begin
read(n);
for a := 1 to n-1 do
for b := a to n-1 do
begin
c := sqrt(sqr(a) + sqr(b));
if c < n then
if c = trunc(c) then
writeln(a:3,' ',b:3,' ',c:3);
end;
end.
{2}
var n,i:integer; s,x:real;
begin
read(n);
s := 0;
for i := 1 to n do
begin
read(x);
s := s + x;
end;
writeln(s/n);
end.
А = 1 "И" "Не А" = 1 то логическая формула равна нулю
А = 1 "И" "Не А" = 0 то логическая формула равно единице
А = 0 "И" "Не А" = 1 то логическая формула равна нулю
А = 0 "И" "Не А" = 0 то логическая формула равна нулю
Пояснение. "и" - это конъюнкция. В ней её переменные равны 1 только в том случае когда обе переменные истины. То есть 1. А так как Не А - это отрицание. То любое число становится противоположным. В данном случае ноль будет единицой