|
Andrew new
|
|
| 1 | |
Напишите подробные комментарии к программе, желательно на каждой строчке объяснит что к чему.07.04.2011, 21:48. Показов 576. Ответов 0
Метки нет (Все метки)
uses Crt; const k=4; a1=3.7718; a2=5,5168; a3=3,5245; f=1; n=3; h=0.05; w1=0.5; w2=7.5; var x,m1:real; i,j,m:integer; y,p,g:array[0..3] of real; procedure pr_1; begin p[1]:=y[2]; p[2]:=y[3]; p[3]:=(k*f-y[1]-a1*y[2]-a2*y[3])/a3; end; BEGIN ClrScr; y[1]:=0; y[2]:=0; y[3]:=0; x:=0; writeln(' x y '); writeln('------------'); REPEAT m1:=int(w1/h); m:=trunc(m1); for j:=1 to m do begin pr_1; for i:=1 to n do begin g[i]:=y[i]+h*p[i]/4; y[i]:=y[i]+2*h*p[i]/3; end; pr_1; for i:=1 to n do y[i]:=g[i]+3*h*p[i]/4; x:=x+h; end; writeln(x:4:2,' ',y[1]:5:3); UNTIL x>w2; readln; END |
|
(| 07.04.2011, 21:48 | |
|
Ответы с готовыми решениями:
0
Разобраться в коде, напишите комментарии к каждой строчке что делает Объяснить, что происходит в заданных примерах с кодом (написать подробные комментарии к каждой инструкции) Сделать комментарии к каждой строчке кода, что они делают? Напишите, пожалуйста, подробные комментарии |
| 07.04.2011, 21:48 | |
| 07.04.2011, 21:48 | |
|
Помогаю со студенческими работами здесь
1
Написать максимально подробные комментарии к данной программе Написать подробные комментарии к каждой строке кода Написать подробные комментарии к каждой строке кода Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
