Регистрация
Lollimil
21.10.2020 01:05
Информатика
Есть ответ 👍

Составить программу Паскаль для нахождения площади кольца где t-толщина, а d- диаметр внутреннего круга
для программы paskalABC
​

170
223
Посмотреть ответы 2

Ответы на вопрос:

alex12345lex
alex12345lex
4,4(27 оценок)

Var s,t,d:real;

begin

readln(t,d);

s:=pi/4*(sqr(d+t*2)-sqr(d));

writeln(s);

end.

smail212313
smail212313
4,5(74 оценок)

Флаг России:

uses Crt,GraphABC;

begin

SetBrushColor(clwhite);

Rectangle(10,10,200,75);

Rectangle(200,74,10,140);

Rectangle(10,139,200,205);

FloodFill(50,30,clwhite);

FloodFill(75,100,clblue);

FloodFill(75,200,clred);

End.

Флаг Японии:

uses Crt,GraphABC;

begin

SetBrushColor(clwhite);

Rectangle(10,10,200,200);

Rectangle(10,10,200,200);

Circle(100,100,45);

FloodFill(75,105,clred);

end.

Популярно: Информатика