Вычислить значение выражения

@Julila · Регистрация: 21.12.2010

Author24 — интернет-сервис помощи студентам

задано задание ввсести к, х , у
и решить уравнениия.
не могу понять что надо исправить в программе

Fortran

       program lab1
implicit none
integer k
double precision x,y,s,t,r
print *, 'enter k,x,y'
read *, k,x,y
print *, 'k= ',k; 'x= ',x; 'y= ',y
s=3**k+2**(k+1)
r=0.284*10**5*EXP((-s)+2)+((y**2+1)**2)**(1./5.)
t=ALOG(ABS(SIN(x)**2))+(1+TAN(y))/((r+1)*SQRT(y));
     
printf('r= ',r 't= ',t)
end

Помогите пожалуйста исправить ошибки

@BakinEugene · 03.10.2011, 10:17

Вы пишете на каком-то фортране с привкусом си.
В фортране, например, нету printf.

Аргументы в print перечисляются через запятую, а не через ;

Ну и в остальном - читайте, что пишет компилятор.

@BakinEugene 35 / 35 / 0 Регистрация: 26.09.2011 Сообщений: 143
	03.10.2011, 10:17	2
	Вы пишете на каком-то фортране с привкусом си. В фортране, например, нету printf. Аргументы в print перечисляются через запятую, а не через ; Ну и в остальном - читайте, что пишет компилятор. 0

Опции темы