((a+b)*c)*a = (a+b)*(c*a)
p1 = (a+b)
p2 = c*a
p = (a+b) * c * a
a b c p1 p2 p
0 0 0 0 0 0
0 0 1 0 0 0
0 1 0 1 0 0
0 1 1 1 0 0
1 0 0 1 0 0
1 0 1 1 1 1
1 1 0 1 0 0
1 1 1 1 1 1
(a+b)*c*a = a*a*c + a*b*c = a*c*b + a*b*c = a*c*(b+1) = a*c
C одной стороны перед словом <span> Paper.doc есть пробел, что делает все варианты неправильными=))</span>
с другой сторны, все 4 варианта могут являться способом задания пути к файлу...
var
i, c, s, n:integer;
Begin
write('Введите n: ');
readln(n);
s:= 0;
c:= 0;
write('Последовательность: ');
while i < n do begin
s:= s + i;
c:= c + 1;
i:= i + 2;
write(i, ' ');
end;
writeln;
writeln('Сумма последовательности: ', s);
writeln('Количество слагаемых: ', c);
END.
var x,y,z:real;
begin
readln(x,y,z);
if (x<y+z) and (y<x+z) and (z<x+y) then begin
if (x=y) and (y=z) then writeln('Ravnostoronnii') else writeln('Ne ravnostoronnii');
end else writeln('Ne vozmojno sostavit');
end.