Задача для 1 класса, По мотивам книги "Разноцветные задачи" 1 класс учебное пособие |
|
|
|
|
5.2.2019, 12:26
|
Универсал
Группа: Участники форума
Сообщений: 5212
Регистрация: 5.12.2008
Из: Россия, Тюмень
Пользователь №: 26323

|
Цитата(инж323 @ 5.2.2019, 13:33)  Но процесс трудоемкий. но и стоит того. в юности читал рассказ о пожилом мастере по дереву, рассказ от первого лица - его ученика. работа уже в советское время, какой-то завод по изготовлению полированной мебели. смысл полирования - берут лак на ткань, губку... наносят на поверхность и начинают полировать мягкой тканью эту поверхность. и так 5-7 слоёв, как было сказано... ученик его однажды спросил, мол, как это у Вас получается, вроде все делают по одной технологии, но у Вас - самая лучшая полировка, и блестит и ровно, и т.д. мастер ему сказал - весь секрет в бородавке на моем подбородке. тот не понял, долго думал, потом опять с тем же вопросом. тогда мастер сказал: - Видишь, на бородавке волосинка растет. Вот когда я её в отражении на полировке вижу - значит можно работу сдавать. оказалось всё просто - труд, труд, и ещё раз труд. закончилось там немного печально. ученик заметил, что старик долго не отдает сделанную работу, и волосинку видно и хорошо вроде. и понял ученик, что старик начал слепнуть.
|
|
|
|
|
|
|
|
5.2.2019, 13:12
|
Группа: Участники форума
Сообщений: 3871
Регистрация: 16.2.2012
Пользователь №: 140571

|
Тоже читал в детстве. "Когда Соболев учил своих мальчишек полировке, он рассказывал им историю одного старика краснодеревца.
Старик был великим искусником. Он полировал мебель так, что она казалась вырубленной из драгоценного камня.
Старик никогда не работал в больших городах. В городском воздухе много пыли, а пыль затуманивает полировку. Старик устроил себе мастерскую на берегу моря и работал только в безветренные дни, когда воздух был совсем чист.
На подбородке у старика торчала бородавка. Из нее росла волосинка, старческая седая волосинка. Старик ее не состригал.
Когда в отполированном дереве, как в зеркале, отражалось лицо старика, — он считал, что работа сделана наполовину. Если можно было разглядеть бородавку, — дело шло к концу. Но совсем вещь бывала готова лишь тогда, когда старик явственно различал отражение своего седого волоса.
Однажды старик несколько месяцев полировал крышку рояля. Подмастерья говорили, что пора шабашить, — лучшей полировки достичь нельзя. Но старик упрямо уходил в мастерскую: он еще не видел волоса и не мог позволить себе бросить работу недоделанной. Он полировал, не давая себе передышки; истекали дни за днями, а отражение не появлялось.
Старик не догадывался, что стал слепнуть.
Он умер в мастерской, так и не отойдя от верстака. Рояль, отполированный им, попал в музей.
Алеша помнил эту историю. И для него она была не просто забавным случаем. Он верил, что с такой же страстью работает его учитель, Корней Лукич. И также хотел поступать и он сам, Алеша, ученик мастера Соболева…"http://e-libra.su/read/355004-rasskazy-proshlogo-leta.html
|
|
|
|
|
|
|
|
5.2.2019, 13:25
|
Группа: Участники форума
Сообщений: 33430
Регистрация: 4.12.2006
Из: 97
Пользователь №: 5032

|
Ну прям растрогали. Бородавки у меня нет. Левкас так делал один раз всего - вешалку в прихожую на старой квартире и более не стал. Реально канительно, хоть и шкурил с водой с "многотысячной шкуркой в гритах". И машинкой низя, да и не было её у меня и нет до сих пор, как и бородавки с волосиной.
|
|
|
|
|
|
|
|
5.2.2019, 14:15
|
Универсал
Группа: Участники форума
Сообщений: 5212
Регистрация: 5.12.2008
Из: Россия, Тюмень
Пользователь №: 26323

|
Цитата(Kotlovoy @ 5.2.2019, 15:12)  Спасибо за ссыль. сыну иногда свои , врезавшиеся в память книги, подсовываю. в электронном виде, чтобы на планшете читать мог. бумага нынче дОрого стОит.
Сообщение отредактировал nick2 - 5.2.2019, 14:16
|
|
|
|
|
|
|
|
7.2.2019, 2:10
|
Универсал
Группа: Участники форума
Сообщений: 5212
Регистрация: 5.12.2008
Из: Россия, Тюмень
Пользователь №: 26323

|
как обещал главное - массовая доля жира соответствует ГОСТ. правда жир не молочный ни разу
20190207_040831_1_.jpg ( 4,16 мегабайт )
Кол-во скачиваний: 17
Сообщение отредактировал nick2 - 7.2.2019, 2:11
|
|
|
|
|
|
|
|
7.2.2019, 8:18
|
инженер ВК
Группа: Участники форума
Сообщений: 5147
Регистрация: 9.3.2011
Из: Липецк
Пользователь №: 97477

|
Весело. Но в предложенном списке не было продуктов никаких. А это, как вы видите, и не сгущенка вовсе. Протестую)
|
|
|
|
|
|
|
|
7.2.2019, 10:56
|
Универсал
Группа: Участники форума
Сообщений: 5212
Регистрация: 5.12.2008
Из: Россия, Тюмень
Пользователь №: 26323

|
Цитата(Dmitry_vk @ 7.2.2019, 10:18)  Но в предложенном списке не было продуктов никаких. А это, как вы видите, и не сгущенка вовсе. Протестую) как не было!? все списал с этикеткитолько опустил название ароматизатора (Сгущеное молоко) и муку поставил на первое место, дабы народ запутать  вечером приду, в чай подмешаю, посмотрите на расслоение. или уж не расстраивать ИНЖа лишний раз? Цитата Блин, плюнули прям в живую рану, только подзабудешь, так снова напомнят. две недели уже на столе стоИт. её даже дети не едят, хотя сгущ у них никогда не задерживалась выкину сегодня в мусорку
Сообщение отредактировал nick2 - 7.2.2019, 11:01
|
|
|
|
|
|
|
|
7.2.2019, 11:56
|
инженер ВК
Группа: Участники форума
Сообщений: 5147
Регистрация: 9.3.2011
Из: Липецк
Пользователь №: 97477

|
Я не о том немного) Это оказался сгущенный продукт, а не сгущенка. 2 большие разницы. В сгущенке мука, насколько помню, не нужна.
|
|
|
|
|
|
|
|
7.2.2019, 13:47
|
Универсал
Группа: Участники форума
Сообщений: 5212
Регистрация: 5.12.2008
Из: Россия, Тюмень
Пользователь №: 26323

|
Цитата(Dmitry_vk @ 7.2.2019, 13:56)  Я не о том немного) Это оказался сгущенный продукт, а не сгущенка. 2 большие разницы. В сгущенке мука, насколько помню, не нужна. да. Она и называется "цельное сгущенное молоко с сахаром" и муки там по ГОСТу быть не должно. как и растительных жиров.
|
|
|
|
|
|
|
|
8.2.2019, 2:09
|
Группа: Участники форума
Сообщений: 33430
Регистрация: 4.12.2006
Из: 97
Пользователь №: 5032

|
Цитата(nick2 @ 7.2.2019, 13:47)  да. Она и называется "цельное сгущенное молоко с сахаром" и муки там по ГОСТу быть не должно. как и растительных жиров. угу. Подзабыл- видел эти сгущенки тоже, но с таким составом и в жестянных банках есть, нарывался и потому как потерял надежду найти нормальное сгущ. молоко цельное с сахаром(а надпись на этикетке вполне может не соответствовать содержимому этой банки), то и не беру совсем сгущенки . все не беру. Но и на конфеты нарывался. Взял как и очень типа вкусные и потом пару разщ взял и снова на ура улетели, пока не сообразил глянуть а кто ж вкусняшку такую делает и тут увидел состав( а он сродни вашему на сгущенке этой). И все, больше эти "конфеты" не брал и покупая что либо вообще посматриваю состав и сроки годности(эти систематично). Вобщем печалька. А конфетки те и дорогие вообще то были, но состав.. такая же химия с мукой, пальмовым маслом, имитаторами вкуса, цвета, запаха и консервирующими фигнями.
|
|
|
|
|
|
|
|
8.2.2019, 6:25
|
Универсал
Группа: Участники форума
Сообщений: 5212
Регистрация: 5.12.2008
Из: Россия, Тюмень
Пользователь №: 26323

|
Цитата(nick2 @ 7.2.2019, 12:56)  вечером приду, в чай подмешаю, посмотрите на расслоение. выкину сегодня в мусорку эксперимент не состоялся. отложен на другой вечер. кума сына родила (только я здесь не при чем, честно). вечером поддерживали папашу в его радости.
|
|
|
|
|
|
|
|
16.2.2019, 2:54
|
Универсал
Группа: Участники форума
Сообщений: 5212
Регистрация: 5.12.2008
Из: Россия, Тюмень
Пользователь №: 26323

|
взаимодействие растворимого кофе и "сгущеночки"
post_26323_1550274597_thumb.jpg ( 13,22 килобайт )
Кол-во скачиваний: 0
|
|
|
|
|
|
|
|
21.3.2019, 0:44
|
проекты ТС без авансов
Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772

|
Учим C# зная Basic & Excel & qb64 ? почему C# & Basic & Excel & qb64 ? потому что C# & qb64 компилируемые у меня компилятор C# csc.exe в Win7 и компилирую через индивидуальный bat Excel: среды даже микро размера Basic: qb64 совместимый с Win7 квадратное уравнение qb64: Код ' quadratic equation QB64 DAV
INPUT "INPUT A"; A INPUT "INPUT B"; B INPUT "INPUT C"; C
D = B ^ 2 - 4 * A * C
IF D < 0 THEN PRINT "D<0 ": END
PRINT "OTBET: " PRINT "D ="; D
X1 = (-B + SQR(D)) / (2 * A) X2 = (-B - SQR(D)) / (2 * A)
PRINT "X1 ="; X1 PRINT "X2 ="; X2
END квадратное уравнение C# без проверки d<0: Код // quadratic equation C# DAV using System; using System.Text; using System.IO; namespace DAV { class Program { static void Main(string[] args) { Console.Write("INPUT A: "); long a = Convert.ToInt32(Console.ReadLine()); Console.Write("INPUT B: "); long b = Convert.ToInt32(Console.ReadLine()); Console.Write("INPUT C: "); long c = Convert.ToInt32(Console.ReadLine());
long d = (b * b - 4 * a * c); Console.WriteLine("OTBET: "); Console.Write("D = "); Console.WriteLine(d);
var x1 = (-b + Math.Sqrt(d)) / (2 * a); var x2 = (-b - Math.Sqrt(d)) / (2 * a);
Console.Write("X1 = "); Console.WriteLine(x1); Console.Write("X2 = "); Console.WriteLine(x2);
Console.ReadKey(); } } } квадратное уравнение excel без проверки d<0: excel: скопировать и вставить в A1 Код 6 7 2 =A2^2-4*A1*A3 =(-A2+КОРЕНЬ(A4))/(2*A1) =(-A2-КОРЕНЬ(A4))/(2*A1) дальше нужно изучить условия создав игрушку "угадай число"
Сообщение отредактировал экспорт - 21.3.2019, 0:51
|
|
|
|
|
|
|
|
22.3.2019, 19:40
|
проекты ТС без авансов
Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772

|
угадываем число от 0 до 100 с подсчётом шагов qb64 за минуту созданы главные строки и за минуты оформлено C# за 3 часа создано по интернет подсказкам с новыми идеями qb64 for 1 minute created main lines and for minutes issued C# in 3 hours created by internet tips with new ideas Код 'qb64 dav guess number from 0 to 100 with counting of steps RANDOMIZE TIMER s = INT(RND * 100) t = 0
10 PRINT: t = t + 1: INPUT "your variant"; a
IF a < s THEN PRINT "need MORE": GOTO 10 IF a > s THEN PRINT "need less": GOTO 10 PRINT "win by"; t; "steps" END Код '//C# dav guess number from 0 to 100 with counting of steps using System; using System.Text; namespace DAV { class Program { static void Main(string[] args) { Random rand = new Random(); int s = rand.Next(100); int t = 0;
dav: Console.WriteLine(); t++;
Console.Write("your variant "); string d = Console.ReadLine(); int a = Convert.ToInt32(d);
if(a > s) { Console.WriteLine("need less"); goto dav; } else if(a < s) { Console.WriteLine("need MORE"); goto dav; } Console.Write("win by "); Console.Write(t); Console.Write(" steps"); Console.ReadKey(); } } }
|
|
|
|
|
|
|
|
22.3.2019, 23:04
|
проекты ТС без авансов
Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772

|
за 1/4 часа на qb64 и за 3/4 часа C# создана программа угадывает число задуманное человеком эмулируя 2 случайных: машинное и человеческое и приближаясь каждый раз деля дистанцию на половину in 1/4 hours on qb64 and in 3/4 hours C# is created program guesses number conceived by man emulating 2 random: machine and human and approaching each time dividing distance by half Код 'qb64 dav guesses number dividing distance by half
RANDOMIZE TIMER
x = 100 n = 0 c = INT(RND * 100) 'comp h = INT(RND * 100) 'human t = 0
h2 = x h1 = n
10 t = t + 1 PRINT t, c, h,
IF h < c THEN PRINT "MORE": a = h: h = INT((h + h2) / 2): h1 = a: GOTO 10 IF h > c THEN PRINT "less": a = h: h = INT((h1 + h) / 2): h2 = a: GOTO 10 PRINT "win by "; t; " steps"
END Код 1 40 11 MORE 2 40 55 less 3 40 33 MORE 4 40 44 less 5 40 38 MORE 6 40 41 less 7 40 39 MORE 8 40 40 win by 8 steps Код //C# dav guesses number dividing distance by half using System; using System.Text; namespace DAV { class Program { static void Main(string[] args) { int x = 100; int n = 0; Random rand = new Random(); int c = rand.Next(100); //comp int h = rand.Next(100); //human int t = 0;
var h2 = x; var h1 = n;
dav: t++; Console.WriteLine(); Console.Write(t); Console.Write(" "); Console.Write(c); Console.Write(" "); Console.Write(h); Console.Write(" ");
if(h < c) { Console.Write("MORE"); int a = h; h = (h + h2) / 2; h1 = a; goto dav; } else if(h > c) { Console.Write("less"); int a = h; h = (h1 + h) / 2; h2 = a; goto dav; } Console.Write("win by "); Console.Write(t); Console.Write(" steps"); Console.ReadKey(); } } }
Сообщение отредактировал экспорт - 22.3.2019, 23:20
|
|
|
|
|
|
|
|
23.3.2019, 0:40
|
Не по вкусу пряник, не по чину мундир.
Группа: Участники форума
Сообщений: 50434
Регистрация: 24.4.2009
Пользователь №: 32666

|
Продолжай, Андрей, нам это люто как интересно.
|
|
|
|
|
|
|
|
24.3.2019, 9:06
|
проекты ТС без авансов
Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772

|
Учим C# зная Basic & Excel & qb64 Learn C# knowing Basic & Excel & qb64 никогда никому ничего не рекомендую и пишу только про себя компилируется программа C# milliard.cs угадывает 1 из миллиарда номеров за 30 ходов =log(10^9;2) = 30 копируем текст программы и вставляем в блокнот и временно сохраняем на рабочий стол с названием milliard.cs в блокноте создаём новый текст 2 строчки C:\Windows\Microsoft.NET\Framework64\v4.0.30319\csc.exe /nologo milliard.cs pause и временно сохраняем на рабочий стол с названием billion.bat переходим в каталог C:\Windows\Microsoft.NET\Framework64\v4.0.30319\ где видим csc.exe и переносим 2 файла milliard.cs billion.bat и создаём ярлык каталога на рабочем столе стартовав billion.bat возникает информ окно и создаётся малый быстрый независимый исполняемый milliard.exe никогда никому ничего не рекомендую и пишу только про себя Код //milliard & billion using System; using System.Text; namespace DAV { class Program { static void Main(string[] args) { int h2 = 1000000000;//or 500 int h1 = 0; Random rand = new Random(); int c = rand.Next(h2); //computer int h = rand.Next(h2); //human or h2/2; int t = 0;
dav: t++; Console.WriteLine(); Console.Write(t); Console.Write(" "); Console.Write(c); Console.Write(" "); Console.Write(h); Console.Write(" ");
if(h < c) { Console.Write("MORE"); int a = h; h = (h + h2) / 2; h1 = a; goto dav; } else if(h > c) { Console.Write("less"); int a = h; h = (h1 + h) / 2; h2 = a; goto dav; } Console.Write("win by "); Console.Write(t); Console.Write(" steps"); Console.ReadKey(); } } } сравнение программ решения квадратного уравнения
Сообщение отредактировал экспорт - 24.3.2019, 9:21
|
|
|
|
|
|
|
|
27.3.2019, 21:39
|
проекты ТС без авансов
Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772

|
обнаружен онлайн компилятор C# и ещё десятков языков без qbasic работающий без регистрации
и там набрав программу возможно сохранить состояние с программой
например программа C# Миллиард угадывающая 1 из 1'000'OOO'ooo за =log(10^9;2) за 30 ходов
rextester.com/JRGX29275
поискав вижу программы хранятся ... 5 лет и наверняка есть онлайн компилятор C# и реально ещё находятся через яндекс поиск
но т.к. интересует графика пока пользуюсь cs & bat
|
|
|
|
|
|
|
|
27.3.2019, 22:55
|
Группа: Участники форума
Сообщений: 33430
Регистрация: 4.12.2006
Из: 97
Пользователь №: 5032

|
Так вы аттачи прицепляете на форум вместо того, что б на андексдиске держать их сохраняя их на случай проблем с компом? А ранее графики по другому делали- http://la-fa.ru/history/history423.html
|
|
|
|
|
|
|
|
29.3.2019, 14:08
|
проекты ТС без авансов
Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772

|
изображения хранятся вне форума чтобы менять в любое время сразу на дюжине форумов а пока рисуем 5D рельеф создав случайный массив высот на QB64 за 5 минут и плюс за час красота и универсальность  Код ' 5д рельеф и массив SCREEN 12: RANDOMIZE TIMER: DIM a(12,12) FOR t=1 TO 12 ' количество FOR x=1 TO 12: FOR y=1 TO 12 a(x,y)=INT(RND*20)'высоты NEXT: NEXT: CLS FOR y=1 TO 12: FOR x=1 TO 11 LINE (50+20*x+20*y, 400-20*y-a(x,y))-(50+20*(x+1)+20*y, 400-20*y-a(x+1,y)), y NEXT: NEXT FOR x=1 TO 12: FOR y=1 TO 11 LINE (50+20*x+20*y, 400-20*y-a(x,y))-(50+20*(x+1)+20*y, 400-20*(y+1)-a(x,y+1)), x NEXT: NEXT:SLEEP 1 NEXT END на C# использована программа маятник из-за чего остались непонятные строки про таймер и от вне/внутри циклов зависит функция случайных и чтоб понять создана другая программа случайных как очищать экран пока неясно и строит медленно и неясно как задавать цвет линиям переменными  ещё как показывает диспетчер задач простая C# программа или массив заполняет память и только в конце строка очистки памяти спасает Код //RELIEF using System; using System.Drawing; using System.Windows.Forms; class RELIEF { Timer timer; // неясно Form form; int[,] a = new int[22, 22]; static void Main(string[] args) { var p = new RELIEF(); } public RELIEF() { form = new Form() { Text = "RELIEF", Width = 600, Height = 360 }; timer = new Timer() { Interval = 200 }; // неясно timer.Tick += delegate(object sender, EventArgs e) // неясно { Random rand = new Random(); // высоты for (int x = 1; x <=12; x++) { for (int y = 1; y <=12; y++) a[x,y]=rand.Next(20); } // параллели Х for (int y = 1; y <=12; y++) { for (int x = 1; x <=11; x++) { var x1 = 50 + 20*x + 20*y; var y1 = 300 - 20*y - a[x,y]; var x2 = 50 + 20*(x+1) + 20*y; var y2 = 300 - 20*y - a[x+1,y];
Bitmap dblBuffer = new Bitmap(form.Width, form.Height); Graphics g = Graphics.FromImage(dblBuffer); Graphics f = Graphics.FromHwnd(form.Handle);
g.DrawLine(Pens.Red, new Point(x1, y1), new Point(x2, y2)); // f.Clear(Color.Green); // оч.экрана не здесь f.DrawImage(dblBuffer, new Point(0, 0)); } } // параллели У for (int x = 1; x <=12; x++) { for (int y = 1; y <=11; y++) { var x1 = 50 + 20*x + 20*y; var y1 = 300 - 20*y - a[x, y]; var x2 = 50 + 20*(x+1) + 20*y; var y2 = 300 - 20*(y+1) - a[x, y+1];
Bitmap dblBuffer = new Bitmap(form.Width, form.Height); Graphics g = Graphics.FromImage(dblBuffer); Graphics f = Graphics.FromHwnd(form.Handle);
g.DrawLine(Pens.Red, new Point(x1, y1), new Point(x2, y2)); // f.Clear(Color.Green); // оч.экрана не здесь f.DrawImage(dblBuffer, new Point(0, 0)); } } Array.Clear(a, 0, 22); // очищает память }; timer.Start(); // неясно Application.Run(form); } } кроме C# маятник есть C# диагонали проще и больше ни одна программа C# не включилась чтобы как в basic: 1 файл = 1 программа поэтому важна моя данная программа 5D рельеф рисующая хоть что-то предсказуемо и одновременно изучаем вложенные циклы и ещё ищу графические программы компилируемые: 1 файл = 1 программа 1bas=1exe & 1cs=1exe анимация компиляция Win7 Framework 440 кБ  и уже созданы этюды про строки
|
|
|
|
|
|
|
|
29.3.2019, 14:11
|
Не по вкусу пряник, не по чину мундир.
Группа: Участники форума
Сообщений: 50434
Регистрация: 24.4.2009
Пользователь №: 32666

|
Андрей, слабо запилить в экселе параболический гиперболоид?
|
|
|
|
|
|
|
|
29.3.2019, 15:57
|
Двойных полосок злой фанат!
Группа: Участники форума
Сообщений: 3631
Регистрация: 8.12.2006
Из: СПб
Пользователь №: 5099

|
Цитата(HeatServ @ 29.3.2019, 14:11)  Андрей, слабо запилить в экселе параболический гиперболоид? Легко!
siski.jpg ( 87,92 килобайт )
Кол-во скачиваний: 5
|
|
|
|
|
|
|
|
30.3.2019, 8:01
|
Не по вкусу пряник, не по чину мундир.
Группа: Участники форума
Сообщений: 50434
Регистрация: 24.4.2009
Пользователь №: 32666

|
Цитата(Ashihara @ 29.3.2019, 15:57)  Легко!
siski.jpg ( 87,92 килобайт )
Кол-во скачиваний: 5Вот за это я матан обожаю.
|
|
|
|
|
|
|
|
4.4.2019, 14:19
|
проекты ТС без авансов
Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772

|
создать бы опрос мол какие ЯПы знаете а пока... анимация "Кот Бэйсик" и далее возможна параметризация animation "Cat Basic" and further parameterization is possible  и распечатал книжку моих программ за минувший год и другой самиздат Код //cat.cs using System; using System.Drawing; using System.Windows.Forms;
class cat: Form { public static void Main() { Application.Run(new cat()); } public cat() { Text = "cat"; BackColor = System.Drawing.Color.Blue; ForeColor = System.Drawing.Color.Red; ResizeRedraw = true; Width = 600; Height = 360; } protected override void OnPaint(PaintEventArgs dan) { Pen pen = new Pen(ForeColor); SolidBrush BlueBrush = new SolidBrush(Color.Blue); Graphics dav = dan.Graphics;
for (int k = 1; k <=5; k++) for (int x = -50; x <=50; x++) { int y=0; if (x< 50) y=-x/5; if (x< 25) y= x/5; if (x<-25) y=-x/5; if (x<-50) y= x/5;
dav.FillRectangle(BlueBrush, 0, 120, 600, 200);
dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+195, 225, 10, -80); dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+200, 200, 100, y+50); dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+280, y+170, 50, 50);
dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+290, y+190, 10, 10);//x/5, x/5 dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+294, y+194, 2, 2); dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+310, y+190, 10, 10);//x/5, x/5 dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+314, y+194, 2, 2);
dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+280, y+205, 25, 10); dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+310, y+205, 25, 10);
dav.DrawLine(new Pen(Color.Magenta, 3), new Point(x*k+280, y+190), new Point(x*k+280, y+160)); dav.DrawLine(new Pen(Color.Magenta, 3), new Point(x*k+290, y+175), new Point(x*k+280, y+160)); dav.DrawLine(new Pen(Color.Magenta, 3), new Point(x*k+330, y+190), new Point(x*k+330, y+160)); dav.DrawLine(new Pen(Color.Magenta, 3), new Point(x*k+320, y+175), new Point(x*k+330, y+160));
dav.DrawLine(new Pen(Color.Magenta, 3), new Point(x*k+210, 240), new Point(x*k+210, 280)); dav.DrawLine(new Pen(Color.Magenta, 3), new Point(x*k+220, 230), new Point(x*k+220, 290)); dav.DrawLine(new Pen(Color.Magenta, 3), new Point(x*k+280, 230), new Point(x*k+280, 290)); dav.DrawLine(new Pen(Color.Magenta, 3), new Point(x*k+290, 240), new Point(x*k+290, 280));
dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+205, 275, 10, 10); dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+215, 285, 10, 10); dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+275, 285, 10, 10); dav.DrawEllipse(new Pen(Color.Magenta, 3), x*k+285, 275, 10, 10);
System.Threading.Thread.Sleep(10); } } }
|
|
|
|
|
|
|
|
4.4.2019, 14:21
|
Не по вкусу пряник, не по чину мундир.
Группа: Участники форума
Сообщений: 50434
Регистрация: 24.4.2009
Пользователь №: 32666

|
Судя по коту, Андрей, в тебе загнулся великий мультипликатор.
|
|
|
|
|
|
|
|
6.4.2019, 14:21
|
проекты ТС без авансов
Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772

|
используя пример сборника программ и подсказку компиляции получилась программа решающая квадратное уравнение  Код //winqua.cs using System; using System.Windows.Forms; class winQUA : Form { winQUA() { Text = "winQUA Например A=6 B=7 C=2"; BackColor = System.Drawing.Color.Green; ForeColor = System.Drawing.Color.Orange; ResizeRedraw = true; Width = 400; Height = 250; {
var zc = -7; var labelc = new Label(); labelc.Text = "C= " + zc + "....."; labelc.Dock = DockStyle.Top; Controls.Add(labelc); var buttonc = new Button(); buttonc.Text = "C+3"; buttonc.Dock = DockStyle.Bottom; buttonc.Click += delegate { zc = zc+3; labelc.Text = "C= " + zc + " ..."; }; Controls.Add(buttonc);
var zb = 12; var labelb = new Label(); labelb.Text = "B= " + zb + "....."; labelb.Dock = DockStyle.Top; Controls.Add(labelb); var buttonb = new Button(); buttonb.Text = "B-1"; buttonb.Dock = DockStyle.Bottom; buttonb.Click += delegate { zb--; labelb.Text = "B= " + zb + " ..."; }; Controls.Add(buttonb);
var za = 2; var labela = new Label(); labela.Text = "A= " + za + "....."; labela.Dock = DockStyle.Top; Controls.Add(labela); var buttona = new Button(); buttona.Text = "A+1"; buttona.Dock = DockStyle.Bottom; buttona.Click += delegate { za++; labela.Text = "A= " + za + " ..."; }; Controls.Add(buttona);
var d = (zb * zb - 4 * za * zc); var labeld = new Label(); labeld.Text = "d= " + d; labeld.Dock = DockStyle.Top; Controls.Add(labeld); var buttond = new Button(); buttond.Text = "d"; buttond.Dock = DockStyle.Bottom; buttond.Click += delegate { d = (zb * zb - 4 * za * zc); double x1 = (-zb + Math.Sqrt(d)) / (2 * za); double x2 = (-zb - Math.Sqrt(d)) / (2 * za); labeld.Text = "d= " + d + " X1 = " + x1 + " X2 = " + x2; }; Controls.Add(buttond); } } static void Main() { Application.Run(new winQUA()); } } 1cs=1exe и далее испытываю движки и окна внутри окна
Сообщение отредактировал экспорт - 6.4.2019, 14:22
|
|
|
|
|
|
|
|
11.4.2019, 0:16
|
проекты ТС без авансов
Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772

|
 Приложение считывает из окон заданные или назначенные значения и создаёт расчёты и оформление используя данные данные и далее планируется графика в форме Код //SUMTAB.cs using System; using System.Windows.Forms; namespace SUMTAB { public class Program { static void Main() { Application.Run(new SUMTAB()); } } class SUMTAB : Form { TextBox textBoxD; TextBox textBoxA; Button buttonV;
public SUMTAB() { var labelD = new Label(); labelD.Text = "D СТРОК"; labelD.Location = new System.Drawing.Point(45, 28); Controls.Add(labelD);
textBoxD=new TextBox(); textBoxD.Text = "3"; textBoxD.Location = new System.Drawing.Point(45, 50); this.Controls.Add(textBoxD);
var labelA = new Label(); labelA.Text = "A СТОЛБЦОВ"; labelA.Location = new System.Drawing.Point(45, 78); Controls.Add(labelA);
textBoxA=new TextBox(); textBoxA.Text = "4"; textBoxA.Location = new System.Drawing.Point(45, 100); this.Controls.Add(textBoxA);
buttonV = new Button(); buttonV.Location = new System.Drawing.Point(45, 200); buttonV.Text = "SUMTAB"; buttonV.Click+=buttonV_Click; Controls.Add(buttonV); }
private void buttonV_Click(object sender, EventArgs e) { int dd = int.Parse(textBoxD.Text); int aa = int.Parse(textBoxA.Text); for (int i = 1; i <= dd; i++) { string s= ""; for (int j = 1; j <= aa; j++) s = s+" "+(i+j).ToString(); var labelI = new Label(); labelI.Text = s; labelI.Location = new System.Drawing.Point(145, 25+25*i); Controls.Add(labelI); } } } }
|
|
|
|
|
|
|
|
12.4.2019, 16:00
|
проекты ТС без авансов
Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772

|
оживил школьный шифр удобный на листах в клеточку  Русский Шифр Клетками патенто способный экспорт ориентированный импорт замещающий и есть отдельные матрицы рус/анг/циф а также в мире каждые 6 минут смотрят ютюб "Учу EXCEL за 6 минут" в сообщ.: http://forum.abok.ru/index.php?showtopic=1...t&p=1434498
Сообщение отредактировал экспорт - 12.4.2019, 16:06
|
|
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
|
Реклама
ООО «Арктика групп» ИНН: 7713634274
Реклама: ООО «СибСтронг» | ИНН 6670013662 | ERID: 2VtzqvdgiCU
ООО «УНИСПЛИТ» ИНН: 6453155081 erid:2VtzqvyN5ZW
Реклама: ООО «СЛ-ЛАЗЕР» ИНН 7727447267 | erid: 2VtzqvY3G2W
Последние сообщения Форума
|