Суждение:
1. Все сосны являются деревьями.
2.Ни один кит - не рыба.
3.Все караси являются рыбами.
4. Все розы - это цветы.
5. Все мухи - это птицы.
Умозаключения:
1. Ты задал вопрос, вопрос задают когда не знают. Умозаключение: ты не знаешь.
2. Все прямоугольники-параллелограммы. Квадрат - это прямоугольник. Умозаключение: квадрат - это параллелограмм.
3. Все люди смертны. Сократ - человек. Умозаключение: Сократ смертен.
4. Звезды взрываются. Солнце - звезда. Умозаключение: Солнце взорвется.
5. У треугольника все углы равны. Умозаключение: треугольник равноугольный
Const
n=5;
m=6;
var
i,j,s,z:integer;
a:array[1..n,1..m]of integer;
begin
for i:=1 to n do
begin
for j:=1 to m do
begin
a[i,j]:=random(10);
write(a[i,j]:3);
end;
writeln;
end;
readln(z);
i:=2;
while i<=n do
begin
for j:=1 to m do
if a[i,j]=z then s:=s+1;
i:=i+2;
end;
writeln('Ответ: ',s);
<span>end.</span>
Var
s,x,n:integer;
function pow(x,n:integer):integer;
var
i,xk:integer;
begin;
xk:=x;
for i:=1 to n-1 do
x:=x*xk;
xk:=x;
pow:=xk;
end;
begin
readln(x);
readln(n);
s:=pow(x,3)+pow(x,5)+pow(x,n);
writeln(s);
<span>end.</span>