Как в паскале узнать что строка может быть переведена в число ? - PascalABC.NET
Формулировка задачи:
Например -65.77 является числом, а 674е - числом не является.
Решение задачи: «Как в паскале узнать что строка может быть переведена в число ?»
textual
Листинг программы
var a:real;
s:string;
b:integer;
begin
s:='-65.77';
val(s,a,b);
if b=0 then write('Число')
else write('Не число');
end.
Объяснение кода листинга программы
- Объявлены три переменные: real a, string s, integer b.
- Значение переменной s установлено в '-65.77'.
- Функция val(s,a,b) пытается преобразовать строку s в число с плавающей точкой и сохранить результат в переменной a, а остаток от деления на 10 в переменной b.
- Если остаток от деления на 10 равен нулю, то выводится сообщение 'Число'.
- Если остаток от деления на 10 не равен нулю, то выводится сообщение 'Не число'.