Var E,P:decimal;
i,j:integer;
Begin
E:=0;
For i:= 3 to 8 do
Begin
P:=1;
For j:= 1 to 9 do
P:=P*sqr(i+j);
E:=E+P
End;
WriteLn('S = ',E);
End.
Pascal
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 var a,b,c,s:real; begin repeat write ('Введите длину гипотенузы c='); readln(c); write ('Введите длину катета a='); readln(a); write ('Введите длину площади s='); readln(s); if (c>b) and (c>0) and (b>0) then begin a:=sqrt(sqr(c)-sqr(b)); s:=(1/2)*b*c; write end.
<em><u /></em>01)В 2)Г 3)А 4)Б 5)А 6)Г 7)Б 8)Б 9)В 10)Б 11)А 12)А 13)В 14)А 15)Б(скорее всего А) 16)А 17)Г 18)В 19)А 20)А 21)В(не уверен) 22)Г 23)Б 24)ответ 3 25)- 26)- <span>А как решили вы?)</span>
Ответ: 10101011=171
10101011
С конца 1=1, 1=2, 0=0, 1=8, 0=0, 1=32, 0=0, 1=128 и все это сложи.
128+32+8+2+1=171
Ответ:
А\/В
Объяснение:
_
А \/ В. |. ¬(¬A v B) v ¬C
0. 1. | 1. 1
0. 0. | 0. 0
1. 1. | 1. 1
1. 0. | 1 1