Program kilim litak icon

Program kilim litak




Скачати 10.16 Kb.
НазваProgram kilim litak
Дата конвертації29.11.2012
Розмір10.16 Kb.
ТипДокументи
1. /БАНК КАЗКОВИХ ЗАВДАНЬ/33 богатыря РОЖКИН сАША.doc
2. /БАНК КАЗКОВИХ ЗАВДАНЬ/БУРАТИНО И ТЕЛЕГРАММА АНДРУСЯК НАСТЯ.doc
3. /БАНК КАЗКОВИХ ЗАВДАНЬ/ВАСИЛИСА ЗАМУЖ.doc
4. /БАНК КАЗКОВИХ ЗАВДАНЬ/ЧЕБУРАШКА И КОВРИК.doc
5. /БАНК КАЗКОВИХ ЗАВДАНЬ/белоснежка и гномы БОЖИКОВ КОСТЯ.doc
6. /БАНК КАЗКОВИХ ЗАВДАНЬ/буратино с ключом МАЙОРОВ СТАС.doc
7. /БАНК КАЗКОВИХ ЗАВДАНЬ/гвидон 1 ОЛИЯР СЛАВИК.doc
8. /БАНК КАЗКОВИХ ЗАВДАНЬ/гра в шахи ЛЕБЕДЕВА ЛЕНА.doc
9. /БАНК КАЗКОВИХ ЗАВДАНЬ/золушкины бусы ДИДКОВСКИЙ ЛЁША.doc
10. /БАНК КАЗКОВИХ ЗАВДАНЬ/иван царевич и серый волк ЧУБЧЕНКО ДЕНИС.doc
11. /БАНК КАЗКОВИХ ЗАВДАНЬ/кай и сн королева БИСЕРОВ САША.doc
12. /БАНК КАЗКОВИХ ЗАВДАНЬ/курочка ряба ВИННИЧЕНКО ВИКА.doc
13. /БАНК КАЗКОВИХ ЗАВДАНЬ/мальвина КУЛИУХ ЖЕНЯ.doc
14. /БАНК КАЗКОВИХ ЗАВДАНЬ/омар юсуф БЛАГОДОВ ИЛЬЯ.doc
15. /БАНК КАЗКОВИХ ЗАВДАНЬ/старик хоттабыч и ковёр БЛАГОДОВ ИЛЬЯ.doc
16. /БАНК КАЗКОВИХ ЗАВДАНЬ/царевна несмеяна СИДОРЕНКО ДИМА.doc
17. /БАНК КАЗКОВИХ ЗАВДАНЬ/червона шапочка ХРАМОВ ВЛАД.doc
Рішення Program vidbir
K золотих він прийшов на телеграф і вирішив послати татові Карло телеграму. За введеним текстом телеграми a
N скринь і кожний рік додається ще по m
A i b. Коли Чебурашка запитав у магазині, які розміри квадратних килимів, що були у продажі, то продавець назвав йому ціле число с
Скринька для Білосніжки
Program zamok
Казкова подорож
Рішення Program Vasilina2
Рішення Program namisto
Х хвилин. Визначити, скільки годин і скільки хвилин він їхав. Порівняти, чого виявилося більше – годин чи хвилин? Рішення
A, а Кай за допомогою викреслювання деякої кількості літер з цього слова має отримати слово b
Рішення Program Riaba
Рішення Program kalendar
V км\с ? Рішення алг доля Омара Юсуфа
Program kilim litak
Рішення Program Nesmeiana
Рішення Program vovk



Чарівний килим-літак старика Хотабича став неслухняним, він самостійно вилетів у космос. Хотабич вирішив наздогнати бешкетника. Написати програму, яка б повідомляла чи наздогнав старик Хотабич свій килим, якщо координати вершин трикутного літака відповідно A(x1,y1, z1), B(x2,y2, z2), C(x3,y3, z3), а координати місця знаходження чарівника Х(x0, y0, z0). (Вважати, що старик Хоттабич наздогнав килим-літак, коли сам на нього сів).

Program kilim_litak;

var

x1,y1, z1, x2,y2 z2, x3,y3, z3, p, S, a, b, c, p1, S1, a1, b1, c1, p2, S2, p3, S3:real;

begin

writeln('A(x1,y1, z1)'); write('x1 = '); readln(x1); write('y1 = '); readln(y1);

write(' z1 = '); readln(z1);

writeln('B(x2,y2)'); write('x2 = '); readln(x2); write('y2 = '); readln(y2);

write(' z2 = '); readln(z2);

writeln('C(x3,y3)'); write('x3 = '); readln(x3); write('y3 = '); readln(y3);

write(' z3= '); readln( z3);

writeln(‘Х(x0, y0, z0))'); write('x0 = '); readln(x0); write('y0 = '); readln(y0);

write(' z0 = '); readln( z0);

a:=sqrt(sqr(x1-x2)+sqr(y1-y2)+ sqr(z1- z2));

b:=sqrt(sqr(x2-x3)+sqr(y2-y3)+ sqr(z2- z3));

c:=sqrt(sqr(x3-x1)+sqr(y3-y1)+ sqr(z3- z1));

a1:=sqrt(sqr(x1-x0)+sqr(y1-y0)+ sqr(z1- z0));

b1:=sqrt(sqr(x2-x0)+sqr(y2-y0)+ sqr(z2- z0));

c1:=sqrt(sqr(x3-x0)+sqr(y3-y0)+ sqr(z3- z0));

p:=(a+b+c)/2;

S:=sqrt(p*(p-a)*(p-b)*(p-c));

p1:=(a1+b+c1)/2;

S1:=sqrt(p1*(p1-a1)*(p1-b)*(p1-c1));

p2:=(a1+b1+c)/2;

S2:=sqrt(p2*(p2-a1)*(p2-b1)*(p2-c));

p3:=(a+b1+c1)/2;

S3:=sqrt(p3*(p3-a)*(p3-b1)*(p3-c1));

if (S=S1+ S2+ S3) then writeln('Хотабич наздогнав килим-літак') else writeln('Хоттабич не наздогнав килим-літак');

readln;

end.



Схожі:

Program kilim litak iconProgram my first program; var name: string

Program kilim litak iconProgram my prog; uses crt; begin

Program kilim litak iconPhilosophy course program for I year students

Program kilim litak iconFuture Leaders Exchange Program, Ukraine

Program kilim litak iconWork program ХІV international exhibition

Program kilim litak iconProgram of work of the Second Specialized Exhibition “Dental Fair”

Program kilim litak iconOpen Society Foundations Higher Education Support Program

Program kilim litak iconWork program of the second specialized fair-exhibition „children’s world-2011”

Program kilim litak iconДокументи
1. /Program Anichtchenko Serge.txt
2. /Program...

Program kilim litak iconShow program as part II specialized exhibition-fair children's world 2011

Program kilim litak iconДокументи
1. /Program for the sponsors.doc
Додайте кнопку на своєму сайті:
Документи


База даних захищена авторським правом ©te.zavantag.com 2000-2017
При копіюванні матеріалу обов'язкове зазначення активного посилання відкритою для індексації.
звернутися до адміністрації
Документи