Какие фигуры относятся к телам вращения (несколько правильных
вариантов) *

сфера
овал
круг
конус
цилиндр​

Type
    mas = array [1..50] of integer;
var
   x,y : mas;
   s1,k1,s2,k2 : integer;
   s,k : integer;
//Если вещественные, а не целые заменить на real(integer)

procedure ma (var x,y : mas);
  var
      i : integer;
  begin
    for i := 1 to 50 do
      begin
      x[i] := random(50);
      y[i]:=random(75);
       end;
   end;
procedure sk (var s,k : integer; a : mas);
  var
      i : integer;
   begin
    s := 0; k := 0;
    for i := 1 to 50 do 
     if a[i] > 0 then
      begin
       s := s + a[i];
       k := k +1;
      end;
   end;

 
begin
randomize;
ma(x,y);
sk (s,k,x);
s1 := s; k1 := k;
sk (s,k,y);
s2 := s; k2 := k;
//вывод по желанию
end.

  

Каркас любого документа word, как уже говорилось, составляют объекты разных классов, объединенные в библиотеки. для документов word основной библиотекой, конечно же, является библиотека классов word9. центральным объектом каркаса документа является объект этой библиотеки  application, определяющий само приложение. поскольку в основе построения объектов office лежит встраивание, 2редактирование текста  –это придание тексту нужного стиля и читабельности, исправление ошибок                             3форматирование текста   — средства его изменения, такие как выбор начертания шрифта и использование эффектов, позволяющих менять вид  текста .