-=InFeRn@L=-

да колодки передние, ничего не клинит. там вот пружинок не было, по одной есть которые держат внутренние получается, а между ними которые за развод видимо отвечают. вот думаю в этом проблема и в не равномерном износе тормозных дисков. где бы только эти пружинки взять) Добавлено спустя 1 минуту 39 секунд: потому что вибрация еще не хорошоя при тормозе)

Hohol84 Спасибо буду пробовать!

Hohol84 как? поскажи)

поставил новые колодки ( демио дв3в), проехал буквально метров 200 остановился, дым идет, только с правой стороны почему то. это нормально, или не очень?) говорят что обгорят, притрутся, подскажите)

делайте сами, очистил бежевый салон на 5+( был просто ужасный). 2 часа работы, 3 часа сушки, правда досыхало еще неделю)) Чистил панели по кругу, сиденья, коврики, обшивку пола. использовал5000-ник, фэри.

lex777 да термостат, снял прокипитил, теперь срабатывает. но вентилятор не включается

Бросил, не курю 4-й день, на работе в обществе всех курящих-даже не тянет. Все зависит от вас)

Kenwood KDC-2092R В лс Цена договорная

Ardem Где он находится не подскажите? sandro857 Крышка целая

Была такая же ерунда, и тоже с маздой)) (демио) Почистил заслонку, поменял провода - пока не беспокоит)

Кипит, вентилятор то срабатывает, то нет. Уровень температуры на приборке не поднимается даже при кипении. В чем может быть проблема?

Всем спасибо) Сдал уже)

piecemaker Учили бы, да только это технолажа, дали задание, как хочешь так и делай

Ну вот именно) а как сделать чтобы с целью какой то он строился) Добавлено спустя 4 минуты 51 секунду: ArtyomK Если не сложно, скиньте хоть что то рабочее по этим методам)

Что это за ад? Какое отношение он имеет к методу Якоби? Как задание то звучало изначально? А от такого форматирования кода выпить захотелось. Подробнее. Далеко не у всех есть какая-нибудь среда разработки для pascal/delphi. В чем проблема? Не компилируется (если да, то какие ошибки)? Неправильно работает (если да, то что именно не так: неправильно считает для такого-то примера или еще чего)? Я не понимаю в этом нифига) Препод сказал что ошибки какие то, мы там командой *гениев* так и не смогли разобраться! А этом (вроде Якоби) не запрашивает ввод значений для вектора в конце программы, а сразу выдает значеия Добавлено спустя 1 минуту 44 секунды: А на счет самого задания, просто сделать 2 программы по этим 2-м методам

Люди добрые! Нужна помощь, т.к. я сам в этом деле НУЛЬ - прошу помощи знающих) 2 задания, вроде как *почти* правильные, но где то есть небольшие ошибки. Помогите) vector=array[1..50] of real; var A:massiv; {переменная массива} B:vector; {переменная массива} i,j,m,n:integer; {переменные для циклов} {------------------------------------------------------------} function simple(x:real):boolean; {процедура проверки числа на "простоту"} label 1; var i:longint; begin if (x=1) or (x=0) then begin result:=false; goto 1; end; for i:=2 to round(x) div 2 do if round(x) mod i=0 then begin result:=false; goto 1; end; result:=true; 1:simple:=result; end; {***конец процедуры проверки числа на "простоту"} {------------------------------------------------------------} procedure make_vector(A:massiv;m,n:integer;var B:vector); var i,j :integer; pr :real; begin for j:=1 to m do begin pr:=1; for i:=1 to n do if simple(A[i,j]) then pr:=pr*A[i,j]; B[j]:=pr; end; end; {------------------------------------------------------------} begin write('N= '); readln (n); {считываем размер массива} write('M= '); readln (m); {считываем размер массива} writeln ('Vvedite elementy massiva A: '); for i:=1 to n do for j:=1 to m do begin write ('A[',i,',',j,']='); readln (A[i,j]); end; {считываем элементы массива} write ('Vot vvedennyi vami massiv A: '); for i:=1 to n do begin writeln; for j:=1 to m do write (A[i,j]:4,' '); end; {выводим массив на экран} writeln;writeln; make_vector(A,m,n,; writeln ('Vot vector B: '); for j:=1 to m do write (B[j]:4,' '); readln; end. type massiv=array[1..50,1..50] of real; Здесь матрица вроде как считается, но не запрашиваются данные для вектора, в этом загвоздка. Var n,i,j,k,r:integer; max,c,s,M:real; a:array [1..50,1..50] of real; b:array [1..50] of real; x:array[1..50] of real; begin ClrScr; Write('Введите размерность'); Readln(n); for i:=1 to n do begin for j:=1 to n do begin Write('a[',i,',',j,']='); Read(a[i,j]); end; Write('b[',i,']='); Readln(b[i]); end; for k:=1 to n do begin max:=abs(a[k,k]); r:=k; for i:=k+1 to n do if abs(a[i,k])>max then begin max:=abs(a[i,k]); r:=i; end; for j:=1 to n do begin c:=a[k,j]; a[k,j]:=a[r,j]; a[r,j]:=c; end; c:=b[k]; b[k]:=b[r]; b[r]:=c; for i:=k+1 to n do begin M:=a[i,k]/a[k,k]; for j:=k to n do begin a[i,j]:=a[i,j]-a[k,j]*M; end; b[i]:=b[i]-b[k]*M; end; end; Writeln('Ступенчатый вид системы'); Writeln; for i:=1 to n do begin for j:=1 to n do Write(a[i,j]); Write('|'); Writeln(b[i]); Writeln; end; Writeln('Ответ'); Writeln; if a[n,n]=0 then if b[n]=0 then Writeln('Уравнение имеет бесконечное множество решений') else Writeln('Уравнение не имеет решений') else begin for i:=n downto 1 do begin s:=0; for j:=i+1 to n do begin s:=s+a[i,j]*x[j]; end; x[i]:=(b[i]-s)/a[i,i]; end; for i:=1 to n do Writeln('x[',i,']=',x[i]:2:1); end; readln; end. Uses Crt; А тут я вообще не понял в чем проблема)

GoOdMeN.Ulanuden Спасибо, попробую! Аленкин Да мне ступица целиком не нужна )

Подскажите где можно купить подшипник? А то по каталогам идет целиком ступица, как то не охота тратиться. Или может от другой машину подходит? Заранее Спасибо!

VISTA363 спасибо

VISTA363 Ремень там

VISTA363 ты можешь сказать цену если я скажу тебе движку?) Демио двига B3

Замена грм сколько стоит примерно на стошках? и куда лучше обратиться?

Insar Спасибо! буду пробовать)

Есть такие кто ставил на демио котел? Как правильно его установить, и в каком месте закрепить? Заранее спасибо)

Аленкин заглянул, ничего путного там нету. но все равно спасибо! меню услышать ответ кто имел дело с этим