Разработать программу для...

Тема в разделе "Информатика", создана пользователем KuJlJleP, 10 фев 2010.

  1. KuJlJleP

    KuJlJleP New Member

    Разработать программу для расчёта площадиповерхности и объёма шара известного радиуса.
     
    KuJlJleP, 10 фев 2010
    #1
  2. Outro

    Outro New Member

    Uses crt;
    var r:integer;
    v,s:real;
    begin
    readln(r);
    s:=4*pi*r*r;
    writeln(s);
    v:=4/3*pi*r*r*r;
    writeln(v);
    end.
     
    Outro, 10 фев 2010
    #2

Поделиться этой страницей

Наша группа