Цветные диагонали Миша увлекается компьютерной - вопрос №21008311 от KaKTyZzZz 02.07.2022 11:11

Question

Информатика: Цветные диагонали Миша увлекается компьютерной графикой. Он хочет нарисовать на экране квадрат размером n n пикселей разными цветами. Монитор Миши поддерживает 26 цветов. Для обозначения цветов будем использовать строчные буквы латинского алфавита от «a» до «z». Миша хочет нарисовать каждый пиксель некоторым цветом, который зависит от расстояния от пикселя до ближайшей диагонали. А именно, клетки на диагоналях квадрата он хочет нарисовать цветом «a», соседние с ними клетки цветом «b», соседние с

KaKTyZzZz · Answer

1. Ну я не знаю какая часть фигуры закрашена. Будем считать что прямоугольник находиться в окружности и необходимо из площади курга вычесть площадь прямоугольника.
const
p =3.14;
var
a,b,r,s1,s2:real;
begin
Writeln('Введите длины сторон прямоугольника');
readln(a,b);
Writeln('Введите радиус окуржности');
Readln(r);
s1:=a*b;
s2:=p*sqr(r);
Writeln('Площадь закрашеной окружности = ', s2-s1);
end.

Если закрашена какая-то другая область то можете просто изменить действие с площадями в предпоследней строчке ( в данном случае мы из s2 вычитаем s1).