Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

программа паскаль! очень надо!

Найдите площадь кольца, внутренний радиус которого равен r , а вписанного R.

Ответ оставил Гость

program kolco;
var
s,s1,s2:real;
r1,r2:integer;
begin
writeln(введите r);
readln(r1);
writeln(введите R);
readln(r2);
s1:=pi*sqr(r1);
s2:=pi*sqr(r2);
S:=s2-s1;
writeln(площадь кольца равна:,S:2:3);
readln;
end.