Слово
«writeln»впервые сказано пользователем
M2b 16.04.2005 в 11:57,
и с тех пор употреблялось
119 раз.
Сообщения со словом
«writeln»
Запрос выполнился за
0.0034 сек.
- 25.12.2011, 00:54. 8mussel в теме
«Программа для решения ОДУ методом Адамса-Мултона (4ого порядка)»
... function f x t real real begin f t 10 10 x end begin writeln введите начальное эначение искомой функции read t0 writeln введите концы отрезка read a b writeln введите число шагов read n h b-a n x 0 a t 0 t0 for i 1 to 3 do begin x i x 0 i h t i t i-1 1 6 k1 2 k2 2 k3 k4 h k1 f x i t i k2 f x i h 2 t i k1 2 k3 f x i h 2 t i k2 2 k4 f x i h t i k3 2 end for i 4 to n do begin x i x 0 i h t i t i-1 h 24 55 f x i-1 t i-1 59 f x i-2 t i-2 37 f x i-3 t i-3 9 f x i-4 t i-4 end for i 1 to n do writeln x i t i 5 2 readln end код program project1 uses crt var x y x0 xn y0 h k1 k2 k3 k4 real n i m integer fi array 1 30 of real 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 n h xn x0 n x 0 x0 y 0 y0 setlength fi i n 1 fi i f x y writeln nachalnoe znachenie x i x 4 4 y i y 4 4 нахождение первых 3-ёх точек 4-тая f0 методом рунге-кутта for i 1 to 3 do begin x i x 0 i h y i y i-1 1 6 k1 2 k2 2 k3 k4 h k1 f x i y i k2 f x i h 2 y i k1 2 k3 f x i h 2 y i k2 2 k4 f x i h y i k3 2 end нахождение остальных точек методом адамса for i 4 to n do begin y i y 0 h 9 fi i-1 19 fi i-2 -5 fi i-3 1 fi i-4 24 x i x 0 i h fi i f x y writeln shag i x x 4 4 y y 4 4 readkey end end
- 16.10.2011, 20:09. mr.Trololoface в теме
«Задачка по информатике 1 семестр»
... integer 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 просто так чтобы можно было сделать проверку если что count 1 mnoj x ln a count mnoj1 mnoj x ln a count 1 write a x 1 while mnoj1-mnoj pogresh do begin write mnoj 2 2 mnoj mnoj1 mnoj1 mnoj x ln a count 1 count count 1 end writeln mnoj1 2 2 readln end но она работает очень...
- 15.05.2011, 23:15. electronka в теме
«Паскаль»
... массив и выведи одной строкой в цикле используя не writeln a write
- 15.05.2011, 22:52. Grey в теме
«Паскаль»
... число a chr b 97 переводим номер буквы в саму букву writeln a выводим букву readln ждем нажатия ентер end...
- 15.05.2011, 22:47. Grey в теме
«Паскаль»
... chr b 97 переводим обратно номер буквы в саму букву writeln b выводим номер writeln c выводим букву после преобразований readln...
- 15.05.2011, 22:33. Grey в теме
«Паскаль»
скомпилировал все работает может стоит пару writeln добавить код writeln b writeln c end все научился пользоваться тегом
- 23.05.2010, 11:58. racell в теме
«Паскаль.Файлы. очень нужно.....»
... begin if a i j 1 then k k 1 end end if k 100 then writeln ваёж ё ёз п else writeln ваёж ё ёз п writeln ёв а бв ж в 1 10 read y for i 1 to 9 do begin for j y to y do begin if a i 1 y a i y then writeln y бв ж г ап з а бв ёо else writeln y бв ж г ап з а бв ёо window 120 40 140 60 for i 1 to 10 do writeln a i y end end readkey close f end
- 28.01.2009, 11:21. TheEnt в теме
«задача в паскале»
... 1 if a b then min a else min b if c min then min c writeln min readln end вот вариант программы в котором числа вводятся пользователем а не в самой программе код var a b c min real begin write a readln a write b readln b write c readln c if a b then min a else min b if c min then min c writeln min readln end
- 27.12.2007, 23:25. George в теме
«pascal»
... first year in college program hello input output begin writeln hello world end senior year in college defun...
- 20.12.2007, 23:31. Stalker1pro в теме
«pascal»
... else state wait end close usingfile закрываем файл writeln x y z выводим полученные значения end вроде...