b:=s[0] in ['A'..'Z','a'..'z'];
if b then
for i=2 to length(s) do
b:=b and s in ['A'..'Z','a'..'z','0'..'9'];
Дан текст. Выяснить, является ли этот текст идентификатором; десятичной записью числа
Здравствуйте. Помогите написать код для следующей задачи:
Дан текст. Выяснить, является ли этот текст идентификатором; десятичной записью целого числа.
Заранее спсибо!
Дан текст. Выяснить, является ли этот текст идентификатором; десятичной записью целого числа.
Заранее спсибо!
Идентификатор
Целое число
Код:
Целое число
Код:
b:=s[0] in ['0'..'9','-','+'];
if b then
for i=2 to length(s) do
b:=b and s in ['0'..'9'];
if b then
for i=2 to length(s) do
b:=b and s in ['0'..'9'];
Спасибо!
К сожалению не получается откомпилировать. Можно написать код для задачи полностью, включая задание переменных.