• программа вычисления площади кольца, используя подпрограмму вычисления площади круга

Ответы 1

  • Код Pascal

    1 const pi=3.14;2 var n,m: real;3 function S(r: real): real;4begin  5 S:=pi*r*r;6 end;7begin  8write('R1='); readln(n); n:=S(n);  9write('R2='); readln(m); m:=S(m);  10writeln('S=',abs(n-m));11end.

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years