Помогите исправить ошибку, пожалуйста
program lab2;
Uses crt; var x,a,Z,u,Ha,Hx:real; Function min(b,c:real):real; begin If b<c Then min:=b; min:=c end; begin ha:=1.3; hx:=1.3; x:=1; repeat a:=2; repeat u:=min(sin(a/x)/cos(a/x),x*sin(x*x)); z:=min(a*sqrt(abs(u)),sin(a)/x); writeln('x=',x:5:2,'a=',a:5:2,'u=',u:5:2) a:a+ha; until a>=4; x:x+hx; until x>=3; end. |
a:a+ha;
пишет что ожидался оператор |
а попробуй написать не ha a Ha?у тебя ж в определении переменных написано с большой буквы! конечно я могу ошибаться,но некоторые языки программирования критичны к этому!
|
Цитата:
a:=a+ha; и дальше x:=x+hx; Цитата:
|
всё получилось, спасибо))
|
Часовой пояс GMT +4, время: 11:44. |
Powered by vBulletin® Version 4.5.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.