Реклама / ООО «ИЗОЛПРОЕКТ» / ИНН: 7725566484 | ERID: 2VtzquhXmku
IPB IPB
Проектирование, монтаж, наладка, сервис


Здравствуйте, гость ( Вход | Регистрация )

- Стандарт НП «АВОК» 7.11-2024
«Рекомендации по проектированию инженерных систем
дошкольных образовательных организаций»

АВОК в соц. сетях
ИНН: 7714824045 | erid: 2VtzqwzKQiU
10 страниц V  « < 8 9 10  
Добавить ответ в эту темуОткрыть тему
> Задача для 1 класса, По мотивам книги "Разноцветные задачи" 1 класс учебное пособие
nick2
сообщение 5.2.2019, 12:26
Сообщение #271


Универсал


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



Цитата(инж323 @ 5.2.2019, 13:33) *
Но процесс трудоемкий. но и стоит того.

в юности читал рассказ о пожилом мастере по дереву, рассказ от первого лица - его ученика.

работа уже в советское время, какой-то завод по изготовлению полированной мебели.
смысл полирования - берут лак на ткань, губку... наносят на поверхность и начинают полировать мягкой тканью эту поверхность. и так 5-7 слоёв, как было сказано...

ученик его однажды спросил, мол, как это у Вас получается, вроде все делают по одной технологии, но у Вас - самая лучшая полировка, и блестит и ровно, и т.д.
мастер ему сказал - весь секрет в бородавке на моем подбородке.
тот не понял, долго думал, потом опять с тем же вопросом.
тогда мастер сказал:
- Видишь, на бородавке волосинка растет. Вот когда я её в отражении на полировке вижу - значит можно работу сдавать.

оказалось всё просто - труд, труд, и ещё раз труд.

закончилось там немного печально. ученик заметил, что старик долго не отдает сделанную работу, и волосинку видно и хорошо вроде. и понял ученик, что старик начал слепнуть.
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
Kotlovoy
сообщение 5.2.2019, 13:12
Сообщение #272





Группа: Участники форума
Сообщений: 3871
Регистрация: 16.2.2012
Пользователь №: 140571



Тоже читал в детстве.
"Когда Соболев учил своих мальчишек полировке, он рассказывал им историю одного старика краснодеревца.

Старик был великим искусником. Он полировал мебель так, что она казалась вырубленной из драгоценного камня.

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

На подбородке у старика торчала бородавка. Из нее росла волосинка, старческая седая волосинка. Старик ее не состригал.

Когда в отполированном дереве, как в зеркале, отражалось лицо старика, — он считал, что работа сделана наполовину. Если можно было разглядеть бородавку, — дело шло к концу. Но совсем вещь бывала готова лишь тогда, когда старик явственно различал отражение своего седого волоса.

Однажды старик несколько месяцев полировал крышку рояля. Подмастерья говорили, что пора шабашить, — лучшей полировки достичь нельзя. Но старик упрямо уходил в мастерскую: он еще не видел волоса и не мог позволить себе бросить работу недоделанной. Он полировал, не давая себе передышки; истекали дни за днями, а отражение не появлялось.

Старик не догадывался, что стал слепнуть.

Он умер в мастерской, так и не отойдя от верстака. Рояль, отполированный им, попал в музей.

Алеша помнил эту историю. И для него она была не просто забавным случаем. Он верил, что с такой же страстью работает его учитель, Корней Лукич. И также хотел поступать и он сам, Алеша, ученик мастера Соболева…"

http://e-libra.su/read/355004-rasskazy-proshlogo-leta.html
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
инж323
сообщение 5.2.2019, 13:25
Сообщение #273





Группа: Участники форума
Сообщений: 33430
Регистрация: 4.12.2006
Из: 97
Пользователь №: 5032



Ну прям растрогали. Бородавки у меня нет. Левкас так делал один раз всего - вешалку в прихожую на старой квартире и более не стал. Реально канительно, хоть и шкурил с водой с "многотысячной шкуркой в гритах". И машинкой низя, да и не было её у меня и нет до сих пор, как и бородавки с волосиной. biggrin.gif
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
nick2
сообщение 5.2.2019, 14:15
Сообщение #274


Универсал


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



Цитата(Kotlovoy @ 5.2.2019, 15:12) *

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

Сообщение отредактировал nick2 - 5.2.2019, 14:16
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
nick2
сообщение 7.2.2019, 2:10
Сообщение #275


Универсал


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



как обещал
главное - массовая доля жира соответствует ГОСТ. правда жир не молочный ни разу
Прикрепленный файл  20190207_040831_1_.jpg ( 4,16 мегабайт ) Кол-во скачиваний: 17


Сообщение отредактировал nick2 - 7.2.2019, 2:11
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
Dmitry_vk
сообщение 7.2.2019, 8:18
Сообщение #276


инженер ВК


Группа: Участники форума
Сообщений: 5147
Регистрация: 9.3.2011
Из: Липецк
Пользователь №: 97477



Весело.
Но в предложенном списке не было продуктов никаких. А это, как вы видите, и не сгущенка вовсе.
Протестую)
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
nick2
сообщение 7.2.2019, 10:56
Сообщение #277


Универсал


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



Цитата(Dmitry_vk @ 7.2.2019, 10:18) *
Но в предложенном списке не было продуктов никаких. А это, как вы видите, и не сгущенка вовсе.
Протестую)

как не было!?
все списал с этикетки
только опустил название ароматизатора (Сгущеное молоко) и муку поставил на первое место, дабы народ запутать rolleyes.gif

вечером приду, в чай подмешаю, посмотрите на расслоение.

или уж не расстраивать ИНЖа лишний раз?
Цитата
Блин, плюнули прям в живую рану, только подзабудешь, так снова напомнят.


две недели уже на столе стоИт. её даже дети не едят, хотя сгущ у них никогда не задерживалась
выкину сегодня в мусорку


Сообщение отредактировал nick2 - 7.2.2019, 11:01
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
Dmitry_vk
сообщение 7.2.2019, 11:56
Сообщение #278


инженер ВК


Группа: Участники форума
Сообщений: 5147
Регистрация: 9.3.2011
Из: Липецк
Пользователь №: 97477



Я не о том немного)
Это оказался сгущенный продукт, а не сгущенка. 2 большие разницы. В сгущенке мука, насколько помню, не нужна.
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
nick2
сообщение 7.2.2019, 13:47
Сообщение #279


Универсал


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



Цитата(Dmitry_vk @ 7.2.2019, 13:56) *
Я не о том немного)
Это оказался сгущенный продукт, а не сгущенка. 2 большие разницы. В сгущенке мука, насколько помню, не нужна.

да. Она и называется "цельное сгущенное молоко с сахаром"
и муки там по ГОСТу быть не должно. как и растительных жиров.
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
инж323
сообщение 8.2.2019, 2:09
Сообщение #280





Группа: Участники форума
Сообщений: 33430
Регистрация: 4.12.2006
Из: 97
Пользователь №: 5032



Цитата(nick2 @ 7.2.2019, 13:47) *
да. Она и называется "цельное сгущенное молоко с сахаром"
и муки там по ГОСТу быть не должно. как и растительных жиров.

угу. Подзабыл- видел эти сгущенки тоже, но с таким составом и в жестянных банках есть, нарывался и потому как потерял надежду найти нормальное сгущ. молоко цельное с сахаром(а надпись на этикетке вполне может не соответствовать содержимому этой банки), то и не беру совсем сгущенки . все не беру. mad.gif
Но и на конфеты нарывался. Взял как и очень типа вкусные и потом пару разщ взял и снова на ура улетели, пока не сообразил глянуть а кто ж вкусняшку такую делает и тут увидел состав( а он сродни вашему на сгущенке этой). И все, больше эти "конфеты" не брал и покупая что либо вообще посматриваю состав и сроки годности(эти систематично). Вобщем печалька. А конфетки те и дорогие вообще то были, но состав.. такая же химия с мукой, пальмовым маслом, имитаторами вкуса, цвета, запаха и консервирующими фигнями.
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
nick2
сообщение 8.2.2019, 6:25
Сообщение #281


Универсал


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



Цитата(nick2 @ 7.2.2019, 12:56) *
вечером приду, в чай подмешаю, посмотрите на расслоение.
выкину сегодня в мусорку

эксперимент не состоялся. отложен на другой вечер.
кума сына родила (только я здесь не при чем, честно). вечером поддерживали папашу в его радости.
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
nick2
сообщение 16.2.2019, 2:54
Сообщение #282


Универсал


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



взаимодействие растворимого кофе и "сгущеночки"
Прикрепленный файл  post_26323_1550274597_thumb.jpg ( 13,22 килобайт ) Кол-во скачиваний: 0
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
экспорт
сообщение 21.3.2019, 0:44
Сообщение #283


проекты ТС без авансов


Группа: Участники форума
Сообщений: 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
Сообщение #284


проекты ТС без авансов


Группа: Участники форума
Сообщений: 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
Сообщение #285


проекты ТС без авансов


Группа: Участники форума
Сообщений: 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
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
HeatServ
сообщение 23.3.2019, 0:40
Сообщение #286


Не по вкусу пряник, не по чину мундир.


Группа: Участники форума
Сообщений: 50434
Регистрация: 24.4.2009
Пользователь №: 32666



Продолжай, Андрей, нам это люто как интересно.
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
экспорт
сообщение 24.3.2019, 9:06
Сообщение #287


проекты ТС без авансов


Группа: Участники форума
Сообщений: 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
Сообщение #288


проекты ТС без авансов


Группа: Участники форума
Сообщений: 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
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
инж323
сообщение 27.3.2019, 22:55
Сообщение #289





Группа: Участники форума
Сообщений: 33430
Регистрация: 4.12.2006
Из: 97
Пользователь №: 5032



Так вы аттачи прицепляете на форум вместо того, что б на андексдиске держать их сохраняя их на случай проблем с компом?
А ранее графики по другому делали-
http://la-fa.ru/history/history423.html
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
экспорт
сообщение 29.3.2019, 14:08
Сообщение #290


проекты ТС без авансов


Группа: Участники форума
Сообщений: 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 кБ



и уже созданы этюды про строки
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
HeatServ
сообщение 29.3.2019, 14:11
Сообщение #291


Не по вкусу пряник, не по чину мундир.


Группа: Участники форума
Сообщений: 50434
Регистрация: 24.4.2009
Пользователь №: 32666



Андрей, слабо запилить в экселе параболический гиперболоид?
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
Ashihara
сообщение 29.3.2019, 15:57
Сообщение #292


Двойных полосок злой фанат!


Группа: Участники форума
Сообщений: 3631
Регистрация: 8.12.2006
Из: СПб
Пользователь №: 5099



Цитата(HeatServ @ 29.3.2019, 14:11) *
Андрей, слабо запилить в экселе параболический гиперболоид?


Легко!


Прикрепленный файл  siski.jpg ( 87,92 килобайт ) Кол-во скачиваний: 5
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
HeatServ
сообщение 30.3.2019, 8:01
Сообщение #293


Не по вкусу пряник, не по чину мундир.


Группа: Участники форума
Сообщений: 50434
Регистрация: 24.4.2009
Пользователь №: 32666



Цитата(Ashihara @ 29.3.2019, 15:57) *
Легко!


Прикрепленный файл  siski.jpg ( 87,92 килобайт ) Кол-во скачиваний: 5

Вот за это я матан обожаю.
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
экспорт
сообщение 1.4.2019, 12:00
Сообщение #294


проекты ТС без авансов


Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772



1 апреля



1 april



? легко нарисовать данные картинки на basic & c# ?

? is it easy to draw these pictures on basic & c# ?

http://rosettacode.org/wiki/Category:C_sharp
http://rosettacode.org/wiki/Category:QB64
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
экспорт
сообщение 4.4.2019, 14:19
Сообщение #295


проекты ТС без авансов


Группа: Участники форума
Сообщений: 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);
}
}
}
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
HeatServ
сообщение 4.4.2019, 14:21
Сообщение #296


Не по вкусу пряник, не по чину мундир.


Группа: Участники форума
Сообщений: 50434
Регистрация: 24.4.2009
Пользователь №: 32666



Судя по коту, Андрей, в тебе загнулся великий мультипликатор.
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
экспорт
сообщение 4.4.2019, 18:54
Сообщение #297


проекты ТС без авансов


Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772



научно обоснованные мультфильмы:
плэйлист 22+ век и МЫ
https://www.youtube.com/playlist?list=PLBBT...Hv0JCdGJ89eAHyU

и ещё плэйлист автокад:
https://www.youtube.com/playlist?list=PLBBT..._ziD9_vmk-9lHhK

и все плэйлисты:
https://www.youtube.com/channel/UC8Ig3Mp2RA...sI1mw/playlists

смотрели в сумме
1/5 миллиона зрителей из 80 стран

Сообщение отредактировал экспорт - 4.4.2019, 18:56
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
экспорт
сообщение 6.4.2019, 14:21
Сообщение #298


проекты ТС без авансов


Группа: Участники форума
Сообщений: 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
Сообщение #299


проекты ТС без авансов


Группа: Участники форума
Сообщений: 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
Сообщение #300


проекты ТС без авансов


Группа: Участники форума
Сообщений: 1813
Регистрация: 31.3.2015
Пользователь №: 263772



оживил школьный шифр
удобный на листах в клеточку



Русский Шифр Клетками

патенто способный
экспорт ориентированный
импорт замещающий

и есть отдельные матрицы рус/анг/циф

а также в мире каждые 6 минут смотрят
ютюб "Учу EXCEL за 6 минут" в сообщ.:

http://forum.abok.ru/index.php?showtopic=1...t&p=1434498

Сообщение отредактировал экспорт - 12.4.2019, 16:06
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения

10 страниц V  « < 8 9 10
Добавить ответ в эту темуОткрыть тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

Реклама
ООО «Арктика групп» ИНН: 7713634274




Реклама: ООО «СибСтронг» | ИНН 6670013662 | ERID: 2VtzqvdgiCU

ООО «УНИСПЛИТ» ИНН: 6453155081 erid:2VtzqvyN5ZW

Реклама: ООО «СЛ-ЛАЗЕР» ИНН 7727447267 | erid: 2VtzqvY3G2W
Последние сообщения Форума






RSS Текстовая версия Сейчас: 28.10.2025, 12:34
Политика ООО ИИП «АВОК-ПРЕСС» в отношении обработки персональных данных