Программа вычисления площади кольца, используя подпрограмму вычисления площади круга
Программа вычисления площади кольца, используя подпрограмму вычисления площади круга
Гость
Ответ(ы) на вопрос:
ГостьКод 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.
Не нашли ответ?
Похожие вопросы