Вычислить площадь поверхности шара

План работы.

1. Условия задачи.

2. Математическая модель.

3. Список переменных с их расшифровкой.

4. Блок-схема алгоритма.

5. Программный код.

1) Есть2) 3) R - радиус, S - площадь4) Прил.5) var  S, R: real;begin  Readln(R);  S := 4 * pi * sqr(r);  writeln(s);end.