Program zadacha;
const pi=3.14;
var r,C,s: real;
Begin
r:=5.4;
C:=2*pi*r;
S:=pi*r*r;
writeln('c=',c);
writeln('s=',s);
end.
Я не знаю ответа,но мне всегда помогает прочитать параграф пару раз и понять,и сама делаю
Const n=25;
var a:array[1..n] of integer;
i,j,p:integer;
begin
for i:=1 to n do a[i]:=random(50)-20;
for i:=1 to n do write(a[i]:4);
writeln;
for i:=1 to 12 do
if (a[i] mod 2 = 0) then a[i]:=2*a[i];
for i:=14 to n-1 do begin
for j:=14 to n-1 do
if a[j]<=a[j+1] then begin
p:=a[j]; a[j]:=a[j+1]; a[j+1]:=p;
end;
end;
for i:=1 to n do write(a[i]:4);
<span>end.</span>
люди , которые заводят животных и воспитывают их,ухаживают, ростят.
Он оказался в этом же каталоге - Энциклопедия