/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
TestSuite/CompilationSamples/StringReal1.pas
16 строк
584 B
Artem Pelenitsyn
change encoding for all *.pas and *.cs files: cp1251 -> utf-8
28 дек 2015, 14:25
28 дек 2015, 14:25
49378a6
Код
Авторство
О чём код?
// Преобразование вещественное <-> строка var s: string; r: real; begin // Преобразование целого в строку r := 3.1415; s := FloatToStr(r); writelnFormat('Целое: {0}. После преобразования к строке: ''{1}''',r,s); // Преобразование строки в целое (может произойти исключение) s := '3.1415'; r := StrToFloat(s); writelnFormat('Строка: ''{0}''. После преобразования к целому: {1}',s,r); end.