Andromagelv 23 октября 2019 в 02:58
Помогите написать программу на паскале которая решит 19 задание
Помогите написать программу на паскале которая решит 19 задание
Var r1,r2,s:real;
begin
write(r = );
readln(r1);
write(R = );
readln(r2);
s:=pi*(r2*r2-r1*r1);
writeln(S = ,s:5:2);
end.
Пример:
r = 2.87
R = 8.51
S = 201.64
begin
write(r = );
readln(r1);
write(R = );
readln(r2);
s:=pi*(r2*r2-r1*r1);
writeln(S = ,s:5:2);
end.
Пример:
r = 2.87
R = 8.51
S = 201.64
Компьютеры и вычисления
81
52
Для комментирования необходимо зарегистрироваться на сайте