Программирование Паскаль, строки
Реализовать функцию, возвращающую действительное число переданное в виде строки.
По дате
По рейтингу
Ты имеешь в виду превращающую число в текстовом формате в число в числовом формате? Если да то воспользуйся функцией StrToInt
Действительные числа — не только целые, но и дробные.
Там есть встроенный метод, что-то вроде StrToFloat(X) или StrToReal(X).
Что-то вроде такого:
Function A(str:string):real;
A:=StrToFloat(str);
В основной программе:
A(Readln())
StrToFloat н-р в классическом Pascal нет. Но в некоторых версиях есть.
Автору вопроса хорошо бы уточнять версию Pascal. =)
Вот функция для действительных чисел типа real:
1234567
function StrToReal(s: string): real;
var
x: real;
begin
Val(s, x);
StrToReal:= x;
end; В основной программе функцию можно применить, например, так:
123456789
var
q: string;
z: real;
begin
Write('Введите дробное число в виде строки: ');
ReadLn(q);
z := StrToReal(q);
WriteLn('Число: ' + z);
end. 12345678
function StrToReal(s: string): real;
var
x: real;
i: integer;
begin
Val(s, x, i);
StrToReal := x;
end; Видео по теме