Ответы на вопрос:
var a,b,d,s: real;
begin
write('Введите a: ');
readln(a);
write('Введите b: ');
readln(b);
write('Введите d: ');
readln(d);
s:=a*b-PI*(d/2)*(d/2);
write('s = ',s);
end.
Популярно: Информатика
-
adfvdrt11.07.2020 02:08
-
carn188915.06.2021 19:10
-
mery7701.05.2023 16:14
-
ruslankalita746rusan16.03.2022 21:33
-
melnushyk09917.06.2022 11:50
-
Dream115522.05.2023 12:47
-
uefip10.06.2023 00:21
-
prokop22821.05.2023 18:41
-
polyaketoztt6707.02.2023 10:38
-
Тёмаэх07.03.2020 03:22