вижу интересует противодействие самообману
значит повторяется моя статья от 7\3\2018… 550+ дневной давности
Экспорт и отличие Инвестиций и фальшь-инвестиций
Экспорт и отличие Инвестиций и фальшь-инвестиций
Инвестиции всегда включают Экспорт
и применив модель Лидер — Ведомый — Жертва
обнаруживаем 4 вида Инвестиций:
2 вида настоящих Инвестиций для Экспорта;
2 вида фальшь-«Инвестиций» без Экспорта;
с обозначениями включающими слово Экспорт.
При зарабатывании на Своих Свои превращаются в Чужих.
Лидер инвестирует в Ведомого с целью Экспорта
продукции на рынок Жертвы с вывозом прибыли
от Жертвы через Ведомого в пользу Лидера.
Параллельно важно выяснить различия понятий
Заказчик и Работодатель:
и Заказчик и Работодатель дают работу и оплату,
однако только Работодатель предоставляет технологию
и в данном смысле начальство иногда часто оказывается
заказчиками своих подчинённых, владеющих своей технологией.
Другие темы:
Учу 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