Учим 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
Интеграл побеждает Логарифм: реальность и зазеркалье
из моих предыдущих статей создана и распечатана книжка
и новейшая версия разделена на 2 части и есть общий вариант
между прочим с разных форумов
скачали и/или/либо прослушали почти 55 раз
12 мб скачать / слушать 30 м. я-диск ИнтЛог_зазеркалье_64_dav.mp3
12 мб скачать / слушать 27 м. я-диск ИнтЛог_реальность_64_dav.mp3
25 мб скачать / слушать 55 м. я-диск ИнтЛог_озвуч_64_dav.mp3
7 мб скачать / слушать 30 м. я-диск ИнтЛог_зазеркалье_32_dav.mp3
7 мб скачать / слушать 27 м. я-диск ИнтЛог_реальность_32_dav.mp3
12 мб скачать / слушать 55 м. я-диск ИнтЛог_озвуч_32_dav.mp3
? неужели сбывается мой прогноз курса валют ?
видя курс одной из валют упавший ниже
предыдущей контрольной точки
повторяю без новых слов:
в то время как здешние
неспособны даже по«думать»
о понижении курса одной из валют
дабы не привлечь на свою голову убытки
мой прогноз основан на понимании
без объяснений
недаром же предсказание было на пике курса
мой курс иносранщины09 августа 2018, 14:54
подтверждая одну из ловушек России и СССР:
«государство якобы обязано поддерживать лазейку
против государства в виде растущего курса доллара»
причём лично у меня и у моих родичей иносранщины нет
и бумажки видел в прошлом 10-летии
ИТОГО: почаще вспоминайте:
? неужели сбывается мой прогноз курса валют ?
видя курс одной из валют упавший ниже
предыдущей контрольной точки
повторяю без новых слов:
в то время как здешние
неспособны даже по«думать»
о понижении курса одной из валют
дабы не привлечь на свою голову убытки
мой прогноз основан на понимании
без объяснений
недаром же предсказание было на пике курса
мой курс иносранщины09 августа 2018, 14:54
подтверждая одну из ловушек России и СССР:
«государство якобы обязано поддерживать лазейку
против государства в виде растущего курса доллара»
причём лично у меня и у моих родичей иносранщины нет
и бумажки видел в прошлом 10-летии
ИТОГО: почаще вспоминайте:
Инь и Ян вероятности и МЫ
Yin & Yang probabilities & WE
Инь и Ян вероятности исследует:
? выиграли повышая вероятность угадать?
сначала вероятность угадать 1/6
далее вероятность угадать 1/4
далее вероятность угадать 1/3
далее вероятность угадать 1/2
далее вероятность угадать 2/3
далее вероятность угадать 3/4
далее вероятность угадать 5/6
Квадрат Экономии Данилиных КЭД QED
и постоянная вероятность выиграть
and constant probability of winning