Нарисовать конус, заполненный наполовину водой

@magman · Регистрация: 20.01.2017

Author24 — интернет-сервис помощи студентам

68. Нарисовать конус, заполненный на половину водой.

@ZX Spectrum-128 · 29.01.2017, 15:35

Нарисовать прямоугольный конус и равнобедренную трапецию

@Puporev · 29.01.2017, 16:20

Pascal

uses graphABC;
var  x,y,r,h:integer;
begin
setwindowsize(500,500);
centerwindow;
x:=250;
y:=375;
line(x,y,x-100,y-200);
line(x,y,x+100,y-200);
ellipse(x-100,y-230,x+100,y-170);
setbrushcolor(clAqua);
ellipse(x-58,y-135,x+58,y-95);
floodfill(x,y-10,clAqua);
end.

@magman 0 / 0 / 0 Регистрация: 20.01.2017 Сообщений: 51
		1
	Нарисовать конус, заполненный наполовину водой 29.01.2017, 12:39. Показов 4560. Ответов 2 Метки нет (Все метки) 68. Нарисовать конус, заполненный на половину водой. 0

@ZX Spectrum-128 6810 / 4567 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	29.01.2017, 15:35	2
	Нарисовать прямоугольный конус и равнобедренную трапецию 0

	29.01.2017, 16:20

Опции темы

Нарисовать конус, заполненный наполовину водой

Решение