Advertisement
Guest User

Untitled

a guest
Mar 20th, 2019
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.13 KB | None | 0 0
  1. using System;
  2. using System.Collections.Generic;
  3. using System.ComponentModel;
  4. using System.Data;
  5. using System.Drawing;
  6. using System.Linq;
  7. using System.Text;
  8. using System.Threading.Tasks;
  9. using System.Windows.Forms;
  10.  
  11. namespace Lab6
  12. {
  13. public partial class Form1 : Form
  14. {
  15. public Form1()
  16. {
  17. InitializeComponent();
  18. InitRnd();
  19. }
  20.  
  21. private Dictionary<string, double> answers = new Dictionary<string, double>();
  22.  
  23. Random randVal = new Random();
  24.  
  25. private void InitRnd()
  26. {
  27. answers.Add("It is certain", 0.05);
  28. answers.Add("It is decidedly so", 0.05);
  29. answers.Add("Without a doubt", 0.05);
  30. answers.Add("Yes β€” definitely", 0.05);
  31. answers.Add("You may rely on it", 0.05);
  32. answers.Add("As I see it, yes", 0.05);
  33. answers.Add("Most likely", 0.05);
  34. answers.Add("Outlook good", 0.05);
  35. answers.Add("Yes", 0.05);
  36. answers.Add("Signs point to yes", 0.05);
  37. answers.Add("Reply hazy, try again", 0.05);
  38. answers.Add("Ask again later", 0.05);
  39. answers.Add("Better not tell you now", 0.05);
  40. answers.Add("Cannot predict now", 0.05);
  41. answers.Add("Concentrate and ask again", 0.05);
  42. answers.Add("Don’t count on it", 0.05);
  43. answers.Add("My reply is no", 0.05);
  44. answers.Add("My sources say no", 0.05);
  45. answers.Add("Outlook not so good", 0.05);
  46. answers.Add("Very doubtful", 0.05);
  47. }
  48.  
  49. private string getRandVal(double a_val)
  50. {
  51. double sum = 0;
  52. foreach (var item in answers)
  53. {
  54. sum += item.Value;
  55. if (a_val - sum <= 0)
  56. {
  57. return item.Key;
  58. }
  59. }
  60. return "";
  61. }
  62.  
  63.  
  64. private void randomBtn_Click(object sender, EventArgs e)
  65. {
  66. string answer = getRandVal(randVal.NextDouble());
  67. answerBox.Text = answer;
  68. }
  69.  
  70. }
  71. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement