Помогите дописать программку с циклами
вычислить использую вложенные циклы....
исходные данные: m=15, x(начальное)=0, x(конечное)=3, n=25, x - вычислить... |
Вложений: 1
вота формула..
|
Цитата:
|
в том то и дело что ничего не известно:(...наверно любое...
|
Мда, формула явно неполная :(
Владимир, полагаю, что ТС просто перепутала слова ;) |
Павля, задачка ровно того же типа, что эта. Так что давайте-ка сами. А мы поможем, если что.
|
вота....НАПИСАЛА:))))....проверте...кажетсь...там всё же чегот не так:((
program..; uses crt; var m,j,k,l:integer; Nx,Kx,x,y,SH,s1,s2:real; begin clrscr; write('Ввод количества шагов M: '); readln(m); write('Ввод начального значения X: '); readln(Nx); write('Ввод конечного значения X: '); readln(Kx); write('Ввод переменной L: '); readln(L); SH:=(Kx-Nx)/m; x:=Nx; for k:=1 to m do begin for j:=l to m do s1:=s1+sqr(j+x); s2:=s2+s1+(k-l/k); x:=x+SH; end; y:=l+20*x+s2; writeln('y = ',y:2:3); readln; end. благодарю за помощ:))):tehnari_ru_077::tehnari_ru_159::tehnari_ ru_102: |
большой результат какой-то кажется:(
|
Цитата:
Кроме того: 1. Перепутаны циклы по х и по k,j. К первому число m не имеет никакого отношения, интервал по х разбивается на n=25 частей. 2. Нужно вывести не одно значение у, а таблицу у(х). 3. Величина (k-l/k), как и (j+x), под знаком суммы идёт в квадрате, а не в первой степени, как у Вас. Сейчас исправлю. Код:
program..; |
хиии...спасибо Вам большое...за всё...СПАСИБО:)
|
Часовой пояс GMT +4, время: 21:10. |
Powered by vBulletin® Version 4.5.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.