У, например благодатной почвой для сюжета можно выбрать - Старые сказки на супер-новый лад... Известные герои с неизвестным продолжением... Как вам такое: Буратино исполнилось 35 лет, Мальвина - его жена, у Буратино 5 детей, Карабас Барабас возглавляет мафиозную структуру и так далее... Или рисованный мультик про Чебурашку-каратиста, который работает в сыскном агентстве ...Вариантов много, буду нужен - пишите на ящик.<span>
</span>
Uses GraphABC;
Var
R:integer:=70; //радиус Солнца
A:array[1..4,1..5] of integer;
//A[1] - x
//A[2] - y
//A[3] - r
//A[4] - r орбиты
v:real:=0.03;
k:integer:=10; // Коэффициент масштабирования орбит
Begin
Window.Maximize;
A[1,3]:=10;
A[1,4]:=R+A[1,3]*k;
A[2,3]:=13;
A[2,4]:=A[1,4]+A[2,3]*k;
A[3,3]:=17;
A[3,4]:=A[2,4]+A[3,3]*k;
A[4,3]:=A[3,3] div 4;
A[4,4]:=A[3,3]+A[4,3]*k;
LockDrawing;
SetCoordinateOrigin(Window.Width div 2,Window.Height div 2);
Repeat
Window.Clear;
Brush.Color := clYellow;
FillCircle(0,0,R);
Brush.Color := clGray;
A[1,1]:=round(A[1,4]*Cos(v*3));
A[1,2]:=round(A[1,4]*Sin(v*3));
FillCircle(A[1,1],A[1,2],A[1,3]);
Brush.Color := clOrange;
A[2,1]:=round(A[2,4]*Cos(v*3/4));
A[2,2]:=round(A[2,4]*Sin(v*3/4));
FillCircle(A[2,1],A[2,2],A[2,3]);
Brush.Color := clBlue;
A[3,1]:=round(A[3,4]*Cos(v/4));
A[3,2]:=round(A[3,4]*Sin(v/4));
FillCircle(A[3,1],A[3,2],A[3,3]);
Brush.Color := clGray;
A[4,1]:=A[3,1]+round(A[4,4]*Cos(20*v));
A[4,2]:=A[3,2]+round(A[4,4]*Sin(20*v));
FillCircle(A[4,1],A[4,2],A[4,3]);
v:=v+0.03;
Redraw;
Until false;
End.
C# не знаю. Ответа вряд ли дождешься.
Если обладаешь минимальными знаниями в C# - переделаешь с C++.
#include <iostream>
const float PI = 3.14;//определите значение сами. Можно, конечно, брать более точное(double) из библиотек, но ограничусь этим.
int main()
{
int
R,//радиус бОльшей окружности.
r = 20,//радиус меньшей окружности.
result;//площадь.
std::cin >> R;
std::cout << "радиус бОльшей окружности = " << R << std::endl;
std::cout << "радиус меньшей окружности = " << r << std::endl;
std::cout << "Площадь равна = " << PI*(R*R-r*r);
}
Кол-во символов 150*40*60=360000
информация на один символ 2^x=32, x=5 бит
всего инф 5*360000=1800000 бит=225000 байт ~ 220 кбайт