Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Клуб программистов > Свободное общение
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.03.2019, 09:53   #21
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,695
По умолчанию

Еще раз запостите этот бред в виде картинки, а то не всем понятно, что вы идиот. Давайте приводите код на шарпе, который writeln(2+2); выдаст 5. А потом аргументы, почему на шарпе нельзя сделать диаграммы. Только учтите, что на ваше qb64 диаграммы получаются, потому что за вас собрали парсер васика (не на васике написанный) + добавили граф.либу (не на васике) + "компонент"... и чем это отличается от кидания какого-нибыдь TChart в шарпе?
p51x вне форума Ответить с цитированием
Старый 23.03.2019, 10:12   #22
сфинкс
Форумчанин
 
Аватар для сфинкс
 
Регистрация: 17.06.2012
Сообщений: 954
По умолчанию

народ! мне не нужно обзываться чтобы
развенчивалась псевдо элита:

Console.Write("2+2=5");

моя остроумная картинка показывает:
хоть что крутое созданное на бэйсик
в 21-м веке вызывает отторжение публики

зато любая мелочь на языках современных
вызывает у публики восторг

поэтому в соответствии с данной моей темой
вход в псевдо элиту реален переделывая
программы из бэйсик в C#

? почему негативный выворачивает наизнанку ?

просто защищает псевдо элитарность C#
от знающих бэйсик
или боится вдруг программы с элитного C#
переведут на якобы устаревший бэйсик
Случайные и Массивы https://programmersforum.ru/showthread.php?t=344371 Учим C# & basic & excel & python https://programmersforum.ru/showthre...=327446&page=5 ничего нерекомендую

Последний раз редактировалось сфинкс; 23.03.2019 в 11:48.
сфинкс вне форума Ответить с цитированием
Старый 23.03.2019, 10:26   #23
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,695
По умолчанию

Цитата:
Сообщение от сфинкс Посмотреть сообщение
моя остроумная картинка показывает:
вы себе слшком льстите

Цитата:
Сообщение от сфинкс Посмотреть сообщение
хоть что крутое созданное на бэйсик
в 21-м веке вызывает отторжение публики
Только в вашей голове или среди таких же фанатиков

Цитата:
Сообщение от сфинкс Посмотреть сообщение
зато любая мелочь на языках современных
вызывает у публики восторг
То-то тут полно тем от студней с простейшими программами и от этих тем так и веет восторгом...

Цитата:
Сообщение от сфинкс Посмотреть сообщение
поэтому в соответствии с данной моей темой
вход в псевдо элиту реален переделывая
программы из бэйсик в C#
ну так вы этого не показали, а на любые вопросы - иди самостоятельно, долго и не в этой теме учи язык

Цитата:
Сообщение от сфинкс Посмотреть сообщение
? почему негативный выворачивает наизнанку ?
хорошо, раз перешли на личности, то буду стараться иначе как идиот вас не называть

Цитата:
Сообщение от сфинкс Посмотреть сообщение
просто защищает псевдо элитарность C#
от знающих бэйсик
врунишка, покажешь, где я говорил про элитарность шарпа или что те, кто знает васик, плохие люди?
p51x вне форума Ответить с цитированием
Старый 23.03.2019, 10:38   #24
сфинкс
Форумчанин
 
Аватар для сфинкс
 
Регистрация: 17.06.2012
Сообщений: 954
По умолчанию

каждый обзывается словами коими боится
обозвать себя и обзывание показывает
защиту своей псевдо элитарности

зато все видим: я не пишу мол кто-то говорил про элитарность
про псевдо элитарность моя идея объясняющая негативного

да и я не боюсь когда на одном из форумов
называют нечто бредом ведь впоследствии
массово поймут правильность как и на других форумах
особенно естественно на форумах иностранных

важнейшее из букв выше

"вход в псевдо элиту реален переделывая программы из бэйсик в C#"
и
"на любые вопросы - иди самостоятельно, долго и не в этой теме учи язык"

здесь ответы простейшие:

1. мне никто не подсказывает и ищу сам
2. большинство тем ещё не рассмотрены: циклы массивы и др.

1. + 2. = 3. развитие тем поможет в будущем читателям
переделывать программы бэйсик на си шарп и обратно

в принципе тема лучше для ветки "свободное общение"

напоминаю страницы созвучные данной моей теме
http://rosettacode.org/wiki/Category:C_sharp
http://rosettacode.org/wiki/Category:QB64
против лже элитарности программирования
Случайные и Массивы https://programmersforum.ru/showthread.php?t=344371 Учим C# & basic & excel & python https://programmersforum.ru/showthre...=327446&page=5 ничего нерекомендую

Последний раз редактировалось сфинкс; 23.03.2019 в 12:20.
сфинкс вне форума Ответить с цитированием
Старый 27.03.2019, 22:23   #25
сфинкс
Форумчанин
 
Аватар для сфинкс
 
Регистрация: 17.06.2012
Сообщений: 954
По умолчанию

обнаружен онлайн компилятор C#
и ещё десятков языков без qbasic
работающий без регистрации

и там набрав программу возможно
сохранить состояние с программой

например программа C# Миллиард
угадывающая 1 из 1'000'OOO'ooo
за =log(10^9;2) за 30 ходов

Код:
//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();
		}
	}
}
rextester.com/JRGX29275

поискав вижу программы хранятся ... 5 лет
и наверняка есть ещё онлайн компилятор C#
и реально ещё находятся через яндекс поиск

но т.к. интересует графика
пока пользуюсь cs & bat

та же программа qbasic million гораздо короче
Код:
'milliion
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
результаты на диапазоне до 100:
Код:
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
Случайные и Массивы https://programmersforum.ru/showthread.php?t=344371 Учим C# & basic & excel & python https://programmersforum.ru/showthre...=327446&page=5 ничего нерекомендую

Последний раз редактировалось сфинкс; 28.03.2019 в 00:05.
сфинкс вне форума Ответить с цитированием
Старый 28.03.2019, 10:55   #26
kvitaliy
Участник клуба
 
Регистрация: 17.05.2011
Сообщений: 1,660
По умолчанию

PureBasic:
Код:
;milliion
 OpenConsole()
Define t=1,h1=0,h2=1000000
c = Random(h2) ;comp
h = Random(h2) ;human

Repeat
  PrintN("Step " + t + " Human = "  + h + " CPU = " + c)  
  t=t+1  
  If h < c
    PrintN ( " MORE"): a = h: h = Int((h+h2)/2): h1 = a  
  ElseIf h > c 
    PrintN  (" less"): a = h: h = Int((h1+h)/2): h2 = a
  EndIf
Until h = c
PrintN( "win by " + t + " steps.")
Input()
End

Последний раз редактировалось kvitaliy; 28.03.2019 в 12:07.
kvitaliy вне форума Ответить с цитированием
Старый 29.03.2019, 14:08   #27
сфинкс
Форумчанин
 
Аватар для сфинкс
 
Регистрация: 17.06.2012
Сообщений: 954
По умолчанию

рисуем 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 кБ



и уже созданы этюды про строки
Случайные и Массивы https://programmersforum.ru/showthread.php?t=344371 Учим C# & basic & excel & python https://programmersforum.ru/showthre...=327446&page=5 ничего нерекомендую
сфинкс вне форума Ответить с цитированием
Старый 29.03.2019, 14:16   #28
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,695
По умолчанию

Цитата:
Сообщение от сфинкс Посмотреть сообщение
как очищать экран пока неясно и строит медленно
и неясно как задавать цвет линиям переменными
Да и вообще, код - гавно. Очень долго бить по рукам тому, кто написал такой код... одно забивание на нумерацию с 0 чего стоит (а что? просто увеличим размер массива, чтоб можно было с 1 ). Вы серьезно не заметили Pens.Red и не поняли как с этим работать?.. Как же вы учить C# собрались, если базовых понятий не имеете?..
p51x вне форума Ответить с цитированием
Старый 29.03.2019, 14:24   #29
сфинкс
Форумчанин
 
Аватар для сфинкс
 
Регистрация: 17.06.2012
Сообщений: 954
По умолчанию

массив дальновидно увеличен для динамики
чтобы в дальнейшем получился мультик
про перемещение по 5Д рельефу

тема называется не "учу" но: "учим" и ведь
уводить в сторону от решения недальновидно все умеют

но программа нуждается всего лишь в ускорении
и в удалении чужого таймера и в очистке экрана
и в разноцветных линиях задаваемых тем же циклом

и за неимением работающих программ C# графических
о чём бы сочинить сообщение
приходится менять единственные стартовавшие

и обязательно чтоб было 1bas=1exe & 1cs=1exe
и ещё ищу программы построения рельефа
Случайные и Массивы https://programmersforum.ru/showthread.php?t=344371 Учим C# & basic & excel & python https://programmersforum.ru/showthre...=327446&page=5 ничего нерекомендую

Последний раз редактировалось сфинкс; 29.03.2019 в 14:28.
сфинкс вне форума Ответить с цитированием
Старый 29.03.2019, 14:32   #30
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,695
По умолчанию

Цитата:
Сообщение от сфинкс Посмотреть сообщение
уводить в сторону от решения недальновидно все умеют
Как самокритично.

Цитата:
Сообщение от сфинкс Посмотреть сообщение
но программа нуждается всего лишь в ускорении
и в удалении чужого таймера и в очистке экрана
и в разноцветных линиях задаваемых тем же циклом
Ну так вперед. Зачем вам таймер с 200 мс задержкой? Крутите как на васике в цикле. И создания объекта рандома вынеесите из цикла, как на васике. И цвет задавайте, а не тупо вставили один и "как же ппоменять"... Тема же вроде про передлки васика в шарп, а пока бред один.
p51x вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перевод кода из qb64 qbasic на C++ AlexDolmat Помощь студентам 0 07.02.2022 01:02
сила трения на qbasic64 - программа, изображающей силу трению в qb64. Например движение бруска по земле блин ир Помощь студентам 3 17.12.2019 13:47
Задача Basic Excel tooooool Помощь студентам 0 20.04.2012 20:00
Visual Basic интегрированный в Excel a1b2 Microsoft Office Excel 3 23.12.2010 19:53