![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() должно выводить число дня недели и само название дня,когда записываю edt2.text:=а; выходит ошибка то что несовместимы
Код:
var a:smallint; b:string; Mywords: array[1..7] of string; begin a:=random(7)+1; str(a,b); edt1.text:=b; edt2.text:=b; Mywords[1]:= 'пн'; Mywords[2]:= 'вт'; Mywords[3]:= 'ср'; Mywords[4]:= 'чт'; Mywords[5]:= 'пт'; Mywords[6]:= 'сб'; Mywords[7]:= 'вс'; Mywords[a]:=b; end; initialization randomize; end. Последний раз редактировалось Admin, 08.02.2012 в 16:41. |