Перевод из TextBox.Text в Real - PascalABC.NET
Формулировка задачи:
Всем здравствуйте. Итак, дан массив TextBox-ов. В нём хранится текст. Необходимо перевести этот массив в другой (такой же по размерности) массив типа Real. Вот программа:
, где W[i1,i2] - массив TextBox-ов, а Wch[i1,i2] - массив типа Real. Сразу скажу, что так программа не работает. Пишет "Нельзя преобразовать тип char к string", хотя если добавить пробелы вот так
, то программа работает, но выводит только нули, если вывести Wch. В массиве W[i1,i2] записаны только такие символы : 1, 2, 3, 4, 5, 6, 7, 8, 9, 1/2, 1/3, 1/4, 1/5, 1/6, 1/7, 1/8, 1/9.
Решение задачи: «Перевод из TextBox.Text в Real»
textual
Листинг программы
Case W[i1,i2].Text of ''+'1',''+'2',''+'3',''+'4',''+'5',''+'6',''+'7',''+'8',''+'9' : Val(W[i1,i2].Text, Wch[i1,i2], Err); '1/2' : Wch[i1,i2] := 1/2; '1/3' : Wch[i1,i2] := 1/3; '1/4' : Wch[i1,i2] := 1/4; '1/5' : Wch[i1,i2] := 1/5; '1/6' : Wch[i1,i2] := 1/6; '1/7' : Wch[i1,i2] := 1/7; '1/8' : Wch[i1,i2] := 1/8; '1/9' : Wch[i1,i2] := 1/9; End;
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д