где ошибка ( z=4.5), (x=1.236). Помогите Program myprog; const rad=3.14/180; var...

0 голосов
43 просмотров

где ошибка ( z=4.5), (x=1.236). Помогите
Program myprog;
const rad=3.14/180;
var a,y,z,x,cos,sin:real;
begin a:=(2*cos*(x-rad*30))/(1/3+((sin*2)*(y+2)));
writeln('z=');
readln(z);
y:=(z*z/5+(z*z)/7);
writeln(' y = ',y);
writeln('введите значение x : ' );
readln(x);
WriteLn(' ответ:',a);
readln(a);
End.


Информатика (34 баллов) | 43 просмотров
Дан 1 ответ
0 голосов
где ошибка ( z=4.5), (x=1.236). Помогите
Program myprog;
const rad=3.14/180;
var a,y,z,x,cos,sin:real;
//переменные 
x,cos,sin никак не определены, следовательно следующее выражение не будет посчитано (=0). кроме того cos и sin это встроенные функции Паскаля. Не стоит использовать их как имена переменных
begin a:=(2*cos*(x-rad*30))/(1/3+((sin*2)*(y+2))); 
writeln('z='); 
readln(z); 
y:=(z*z/5+(z*z)/7);
writeln(' y = ',y); 
writeln('введите значение x : ' ); 
readln(x);
// Вы ввели значение х в конце программы. Оно нигде в расчетах уже не сможет участвовать
WriteLn(' ответ:',a);
readln(a); 
End.
(3.5k баллов)