Array в паскале
Автор ViRUS задал вопрос в разделе Другие языки и технологии
String to array в паскале и получил лучший ответ
Ответ от Krab Вark[гуру]
"мне нужно каждую цифру в отдельный элемент массива" "типа Integer" var s:string; a:array[1..255]of integer; j,n:integer; begin write('string? '); readln(s); n:=length(s); for j:=1 to n do a[j]:=ord(s[j])-48; for j:=1 to n do write(a[j]:2); readln end. Вводишь, например, 15472378
Ответ от Ѐасим А.[гуру]
Никак.
Никак.
Ответ от Sm[гуру]
Функцию нужно написать. Только надо ли оно ?) Вот в чем вопрос ..
Функцию нужно написать. Только надо ли оно ?) Вот в чем вопрос ..
Ответ от Krab Вark[гуру]
Готовой функции нет, но ее легко написать, проходя по строке и ппользуясь стандартной функцией val преобразования строковой записи числа в само число. Наоборот - проходя в цикле по массиву и пользуясь стандартной функцией str.
Готовой функции нет, но ее легко написать, проходя по строке и ппользуясь стандартной функцией val преобразования строковой записи числа в само число. Наоборот - проходя в цикле по массиву и пользуясь стандартной функцией str.
Ответ от Џдерный Богослов[гуру]
var mas: array of integer; str: string; ... for i:=0 to (length (str)-1) do mas:=strtoint(str); Реализовывать в делфи. В паскале вместо strtoint используется функция val (которую собственно strtoint и содержит)
var mas: array of integer; str: string; ... for i:=0 to (length (str)-1) do mas:=strtoint(str); Реализовывать в делфи. В паскале вместо strtoint используется функция val (которую собственно strtoint и содержит)
Ответ от Илья Былич[новичек]
for i:=1 to length(s) do m:=ord(s)-ord('0'); все!
for i:=1 to length(s) do m:=ord(s)-ord('0'); все!
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: String to array в паскале