Слово
«vvedite»впервые сказано пользователем
M2b 16.04.2005 в 11:57,
и с тех пор употреблялось
30 раз.
Сообщения со словом
«vvedite»
Запрос выполнился за
0.0031 сек.
- 27.03.2013, 20:12. Silver MC's в теме
«Программирование. Помогите с программой.»
... line input mat int n int i j struct line pl do printf vvedite kol-vo strokn scanf d n while n 0 для такого цикла n надо сначала проинициализировать n 0 т к по умолчанию там не обязательно лежит 0 if pl struct line malloc n sizeof struct line null return null for i 0 i n i do printf vvedite kol-vo elementov stroki dn i 1 scanf d pl i n while pl i n 0 в этом цикле аналогично элементы массива надо проинициализировать if pl i a int malloc pl i n sizeof int null return null for j 0 j pl i n j printf vvedite d element d ctrokin j 1 i 1 scanf d pl i a j return pl vvivod matr po strokam void print mat struct line pl int n int i j for i 0 i n i for j 0 j pl i n j printf d c pl i a j j 1 pl i n n obrabotka int mat netnol struct line pl int n назначение этой функции я так и не понял по заданию ведь надо чтобы элемент i вектора содержал количество различных элементов в строке i исходного массива int i m if m int malloc n sizeof int null return null for i 0 i n i m i pl i n pl i n return m osvobogdenie pamati void mat free struct line pl int n int i for i 0 i n i free pl i a free pl vivod massiva int print mas int a int n int i for i 0 i n i printf d c a i i 1 n n int main struct line pl int n m printf vvedite matrn pl input mat n if pl null perror malloc...
- 20.03.2013, 19:45. Thommees в теме
«Программирование. Помогите с программой.»
... line input mat int n int i j struct line pl do printf vvedite kol-vo strokn scanf d n while n 0 if pl struct line malloc n sizeof struct line null return null for i 0 i n i do printf vvedite kol-vo elementov stroki dn i 1 scanf d pl i n while pl i n 0 if pl i a int malloc pl i n sizeof int null return null for j 0 j pl i n j printf vvedite d element d ctrokin j 1 i 1 scanf d pl i a j return pl vvivod matr po strokam void print mat struct line pl int n int i j for i 0 i n i for j 0 j pl i n j printf d c pl i a j j 1 pl i n n obrabotka int mat netnol struct line pl int n int i m if m int malloc n sizeof int null return null for i 0 i n i m i pl i n pl i n return m osvobogdenie pamati void mat free struct line pl int n int i for i 0 i n i free pl i a free pl vivod massiva int print mas int a int n int i for i 0 i n i printf d c a i i 1 n n int main struct line pl int n m printf vvedite matrn pl input mat n if pl null perror malloc...
- 25.12.2011, 00:54. 8mussel в теме
«Программа для решения ОДУ методом Адамса-Мултона (4ого порядка)»
... function f x y real real begin f -m y end begin writeln vvedite diapazon otrezka a b read x0 xn writeln vvedite y x0 2 2 read y0 writeln vvedite kolichestvo shagov izmenenia argumenta readln...
- 16.10.2011, 20:09. mr.Trololoface в теме
«Задачка по информатике 1 семестр»
... mnoj pogresh mnoj1 real c a extended begin writeln vvedite a readln a writeln vvedite x readln x writeln vvedite pogreshnost readln pogresh c intpower a x просто...
- 29.09.2011, 22:33. SailQ в теме
«Вопрос по фортрану»
... вот код program one real x w integer m i k s d print vvedite nachalnoe priblizhenie trebyemyu tochnost q...
- 25.12.2005, 20:54. 123trancer в теме
«и еще одна прога»
... var k integer var abon spr begin append f writeln vvedite familiy readln abon family write f abon family writeln vvedite ima readln abon name write f abon name writeln vvedite domashnii telefon readln abon tel1 write f abon tel1 writeln vvedite mobilnii telefon readln abon tel2 writeln f abon tel2 close f num2 f t k end procedure num3 t mas k integer var i n integer a s str begin writeln vvedite bykvy dla poiska readln s n 0 for i 1 to k do begin a copy t i family 1 1 if a s then begin writeln t i family t i name t i tel1 t i tel2 n 1 end end if n 0 then writeln abonent ne naiden end procedure num4 t mas k integer var s str i n integer begin writeln vvedite familiy readln s n 0 for i 1 to k do begin if s t i family then begin writeln t i family t i name t i tel1 t i tel2 n 1 end end if n 0 then writeln abonent ne naiden end procedure num5 var f text var t mas k integer var s str i n j integer begin writeln vvedite familiy readln s j 0 for i 1 to k do begin if t i family s then begin writeln t i family t i name t i tel1 t i tel2 writeln esli xotite redaktirovat na mite 1 esli net 0 readln n if n 1 then begin writeln vvedite familiy readln t i family writeln vvedite ima readln t i name writeln vvedite domashnii telefon readln t i tel1 writeln vvedite mobilnii telefon readln t i tel2 j 1 end end end if j 1 then begin rewrite f for i 1 to k do writeln f t i family t i name t i tel1 t i tel2 close f end else writeln abonent ne naiden end procedure num6 var f text var t mas var k integer var s str i n integer begin writeln vvedite familiy readln s n 0 for i 1 to k do begin if t i family s then begin t i family t k family t k family t i name t k name t k name t i tel1 t k tel1 t k tel1 t i tel2 t k tel2 t k tel2 k k-1 n 1 end end if n 1 then begin rewrite f for i 1 to k do writeln f t i family t i name t i tel1 t i tel2 close f writeln ydalenie zaversheno end else writeln abonent ne naiden end procedure num7 t mas k integer var i integer begin for i 1 to k do writeln t i family t i name t i tel1 t i tel2 end procedure menu z integer var f text var t mas k integer begin writeln z 10 while z 0 do begin writeln vvedite pynkt writeln 1 dobavit abonenta writeln 2...
- 16.04.2005, 11:57. M2b в теме
«Сумма ряда: разве глюк?»
... series var u1 u2 x k eps real i j word begin write vvedite znachenie x readln x writeln exp x exp x write vvedite znachenie pogreshnosti readln eps writeln k 1 j 1 u1 1 u2 1 while u1 x k eps do begin u1 u1 x k u2 u2 u1 k k 1 j j 1 end writeln otvet while u2 writeln absolutnaya pogershnost exp x -u2 writeln chislo slagaemikh j k 1 j 1 u1 1 u2 1 repeat begin u1 u1 x k u2 u2 u1 k k 1 j j 1 end until u1 x k eps writeln otvet repeat u2 writeln absolutnaya pogershnost exp x -u2 writeln chislo slagaemikh j writeln k 1 j 1 u1 1 u2 1 write vvedite chislo slagaemih readln i for i i downto 2...