Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Free Pascal, Pascal ABC и другие _ Пользователь задаёт длину стороны квадрата.Подсчитать площадь закрашенной фигуры.

Автор: Just_Started 6.12.2019 21:23

Здравствуйте,совсем недавно решил попробовать себя в программирование(использую PascalABC.NET,потому-что этого требует школьная программа).Пожалуйста ,может кто помочь в написании кода для решение прикреплённой
ниже задачи?Если нетрудно объясните как вы решили,буду очень благодарен!Заранее спасибо!


Эскизы прикрепленных изображений
Прикрепленное изображение

Автор: Федосеев Павел 9.12.2019 1:46

Для 1-й фигуры.
Пусть Ssquare - площадь квадрата, Scircle - площадь круга
Тогда площадь заштрихованной фигуры будет
S=Scircle+(Ssquare-Scircle)/4=(Ssquare+3*Scircle)/4

На Pascal это будет

program test;

var
  a, S: real;
begin
  Write('a=');
  readln(a);
  S := (a * a + 3 * Pi * a * a / 4) / 4;
  writeln(S);
end.
Именно на PABC.NET проверить не могу, но должно работать