иван 23
Сообщение
#46778 6.12.2009, 11:10
Дано А(альфа)=14, V0=750м/с. Найти: t=2*V0*sin(AR)/g; h=SQR(V0)*SQR(sin(AR))/2*g; L=SQR(V0)*SQR(sin(AR))/g; R1=SQR(V0)/g*cos(AR); R2=SQR(V0)*cos(AR)/g очень нужна помощь, заранее спасибо!
Евгений М.
Сообщение
#46784 6.12.2009, 11:23
Правила форума:
http://www.prepody.ru/ipb.html?act=boardrulesГде ваши наработки? Что у вас там не так?
иван 23
Сообщение
#46789 6.12.2009, 11:32
есть наработки, тока я не знаю как из паскаля их вам показать, вообщем не понял как скопировать можно
граф Монте-Кристо
Сообщение
#46805 6.12.2009, 13:26
Откройте блокнотом файл с программой.
иван 23
Сообщение
#46810 6.12.2009, 13:50
не получается, папку паскаля открываю, а тм пусто. а если вам напишу сюда прост?
иван 23
Сообщение
#46811 6.12.2009, 14:00
Program window;
Const g=9.81;
Var t,h,l,r1,r2:real;
v0, A: integer;
Begin
Readln (A, v0);
AR:=pi*A/180;
t:=2*V0*sin(AR)/g;
h:=SQR(V0)*SQR(sin(AR))/2*g;
L:=SQR(V0)*SQR(sin(AR))/g;
R1:=SQR(V0)/g*cos(AR);
R2:=SQR(V0)*cos(AR)/g;
Writeln (r1,r2);
End.
граф Монте-Кристо
Сообщение
#46817 6.12.2009, 14:14
AR у Вас не определено. Кроме того,стоит прописать в конце перед end'ом readln,чтобы можно было посмотреть,что на вывод идёт.
иван 23
Сообщение
#46833 6.12.2009, 14:42
а сможете подсказать как AR определить? пожалуйста
граф Монте-Кристо
Сообщение
#46839 6.12.2009, 14:52
Ну так же,как Вы остальные переменные определили
иван 23
Сообщение
#46843 6.12.2009, 15:03
ничего не понимаю) сможете показать наглядно, а то я с этой прогой уже давно мучаюсь, все перепробовал- не запускается и все(
граф Монте-Кристо
Сообщение
#46848 6.12.2009, 15:24
AR:real;
иван 23
Сообщение
#46905 7.12.2009, 1:43
спасииибо вам огромное)))) запустилась прога
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста,
нажмите сюда.