вижу интересует противодействие самообману
значит повторяется моя статья от 7\3\2018… 550+ дневной давности
Экспорт и отличие Инвестиций и фальшь-инвестиций
Экспорт и отличие Инвестиций и фальшь-инвестиций
Инвестиции всегда включают Экспорт
и применив модель Лидер — Ведомый — Жертва
обнаруживаем 4 вида Инвестиций:
2 вида настоящих Инвестиций для Экспорта;
2 вида фальшь-«Инвестиций» без Экспорта;
с обозначениями включающими слово Экспорт.
При зарабатывании на Своих Свои превращаются в Чужих.
Лидер инвестирует в Ведомого с целью Экспорта
продукции на рынок Жертвы с вывозом прибыли
от Жертвы через Ведомого в пользу Лидера.
Параллельно важно выяснить различия понятий
Заказчик и Работодатель:
и Заказчик и Работодатель дают работу и оплату,
однако только Работодатель предоставляет технологию
и в данном смысле начальство иногда часто оказывается
заказчиками своих подчинённых, владеющих своей технологией.
? неужели сбывается мой прогноз курса валют ?
видя курс одной из валют упавший ниже
предыдущей контрольной точки
повторяю без новых слов:
в то время как здешние
неспособны даже по«думать»
о понижении курса одной из валют
дабы не привлечь на свою голову убытки
мой прогноз основан на понимании
без объяснений
недаром же предсказание было на пике курса
мой курс иносранщины09 августа 2018, 14:54
подтверждая одну из ловушек России и СССР:
«государство якобы обязано поддерживать лазейку
против государства в виде растущего курса доллара»
причём лично у меня и у моих родичей иносранщины нет
и бумажки видел в прошлом 10-летии
Другие темы:
Учу EXCEL за 6 минутУчим C# Windows Forms зная Basic
Интеграл обманывает чужих и МЫ
Волны вероятности повышают надёжность
Учим C# зная basic
Цель данной темы: разместить в интернет программы
по каким возможно быстро выучить C# зная basic
Никому никогда ничего не рекомендую и всегда пишу только про себя
Программы созданы мной на основе моей главной программы
где запрограммирован мой алгоритм в нескольких вариантах
и теперь программирую на C# сразу без перевода из basic
? Почему C# & basic?
Потому что компилируемые и есть онлайн компиляторы
и компилятор C# включен в Windows 7 Framework
Программы проверены: работают и каждый может проверить
и лично я компилирую и стартую через простейший bat
Квадратное уравнение 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#
// 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(); } } }
'Угадай число 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
//Угадай число 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(); } } }
'Угадывает 1 из 1000000 RANDOMIZE TIMER t=0:h1=0:h2=10^6 c=INT(RND*h2) 'comp h=INT(RND*h2) 'human 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