Версия для печати темы

Автор: kate_suglobova 12.10.2017 0:02

Что значит когда мы перед begin и end ставим //? Что в данном случае является телом цикла?



Uses CRT;
Var W,m,x,z: real;
i,n: integer;
Const b=-1.4; h=0.5; x0=-3; x1=2;
Begin
textcolor(green);
x:=x0;
writeln(' _______________________');
writeln('| x | z | W |');
writeln('|_______|_______|_______|');
n:=trunc((x1-x0)/h+1);
for i:=1 to n do
//begin
if x<=-2 then z:=5*x-1.7
else if x>1.5 then z:=sqr(cos(x))
else z:=ln(abs(x+2));
if m<x then m:=x else m:=b;
W:=m*cos(sqr(z))/exp(x-z);
writeln('|',x:7:2,'|',z:7:2,'|',w:7:2,'|');
x:=x+h;
//end;
writeln('|_______|_______|_______|');
End.

Автор: Федосеев Павел 14.10.2017 16:57

Так обозначаются однострочные комментарии

  // комментарий
  {
  многострочные комментарии
  строка
  }

После удаления begin-end тело цикла for сократиться до оператора if - он со вложенными условиями, поэтому тело цикла будет состоять из

for i:=1 to n do
//begin
if x<=-2 then z:=5*x-1.7
else if x>1.5 then z:=sqr(cos(x))
else z:=ln(abs(x+2));