Вывести в Memo2 надпись «В 10-ку!(win)», при условии, что число, сгенерированное функцией [random] в Memo1, равно 10. В противоположном случае, в Memo2 вывести надпись «Мимо!(lose)» — Delphi(Делфи)

Компоненты Memo1 и Memo2 расположены на форме друг напротив друга. Строки Текста из Memo1 и Результат Memo2 должны совпадать. Задание необходимо решить путем сравнения строковых переменных. Для решения не допускается применение значений функции [random]. Memo1 наполняется циклом от 1 до N (N — RandomRange(100,200)). Каждый раз, при проходе цикла, в Memo1 добавляется текст, часть которого генерируется «наугад» (Memo1.Lines.Add(‘xxx’+inttostr(random(100))+’yyy’ )). «XXX» и «YYY» — условно, текст произвольной длинны и набора символов.

Read More