Вероника Тепляшина
was last seen 5 January at 16:43
Иркутск, Россия
Дана сторона квадрата a. Найти его площадь S = a2.
Unsubscribe from irrelevant news
To unsubscribe from another user's news, click the settings icon in this post and select the necessary option.
Все
Guestbook
More
Вероника Тепляшина
asked a question
17 May 2016 at 12:35
otvet-add.html
Вероника Тепляшина
installed a game
23 January 2016 at 11:46
app-install.html
ДОМ-2.Найди свою любовь
Играть
ДОМ-2. Найди свою любовь – увлекательная игра для общения и поиска своей любви! Знакомьтесь, целуйтесь, дарите подарки, становитесь топовыми игроками и улучшайте отношения с теми, кто вам действительно понравился!
99 173
Вероника Тепляшина
subscribed to 2 groups
12 December 2015 at 13:56
community-join.html
Вероника Тепляшина
asked a question
22 November 2015 at 10:24
otvet-add.html
Вероника Тепляшина
subscribed to 2 groups
13 May 2015 at 17:09
community-join.html
Вероника Тепляшина
subscribed to 2 groups
27 April 2015 at 17:51
community-join.html
Вероника Тепляшина
wrote
status.html
Дана сторона квадрата a. Найти его площадь S = a2.
Вероника Тепляшина
wrote
status.html
Даны два круга с общим центром и радиусами R1 и R2 (R1 > R2).
Найти площади этих кругов S1 и S2, а также площадь S3 кольца, внешний радиус которого равен R1, а внутренний радиус равен R2: S1 = ?•(R1)2, S2 = ?•(R2)2, S3 = S1 ? S2. В качестве значения ? использовать 3.14.
Найти площади этих кругов S1 и S2, а также площадь S3 кольца, внешний радиус которого равен R1, а внутренний радиус равен R2: S1 = ?•(R1)2, S2 = ?•(R2)2, S3 = S1 ? S2. В качестве значения ? использовать 3.14.
Вероника Тепляшина
wrote
status.html
int R1,R2;
float S1,S2,S3;
R1=StrToInt(Edit1->Text);
R2=StrToInt(Edit5->Text);
if (R1<0 && R2<0)
ShowMessage('Радиус должен быть больше 0 ');
if (R1<R2)
ShowMessage('Должно быть R1>R2 ') ;
S1=3.14*R1*R1;
S2=3.14*R2*R2;
S3=S1-S2;
Edit2->Text=FloatToStr(S1);
Edit3->Text=FloatToStr(S2);
Edit4->Text=FloatToStr(S3);
float S1,S2,S3;
R1=StrToInt(Edit1->Text);
R2=StrToInt(Edit5->Text);
if (R1<0 && R2<0)
ShowMessage('Радиус должен быть больше 0 ');
if (R1<R2)
ShowMessage('Должно быть R1>R2 ') ;
S1=3.14*R1*R1;
S2=3.14*R2*R2;
S3=S1-S2;
Edit2->Text=FloatToStr(S1)
Edit3->Text=FloatToStr(S2)
Edit4->Text=FloatToStr(S3)
Uploading
Error loading page. Retry in 15 seconds.
Error loading page. Retry in 5 seconds.
Error loading page. Retry in 5 seconds.
Яркие краски
от
Команда проекта
Мой Мир
Other people named Вероника Тепляшина in My World