USES SysUtils и ошибка Syntax Error, "BEGIN" expected but "identifier SYSUTILS" - Free Pascal
Формулировка задачи:
Подключаю SysUtils дабы использовать ф-ции
и
, но выдает ошибку Fatal: Syntax Error, "BEGIN" expected but "identifier SYSUTILS". Вот части кода:
В чем может быть проблема?
Листинг программы
- StrToInt
Листинг программы
- IntToStr
Листинг программы
- Uses crt; SysUtils;
Листинг программы
- n:=StrToInt(nn);
Решение задачи: «USES SysUtils и ошибка Syntax Error, "BEGIN" expected but "identifier SYSUTILS"»
textual
Листинг программы
- uses SysUtils,crt;
- var a:integer;
- s:string;
- begin
- clrscr;
- a:=123;
- s:=inttostr(a);
- writeln(s);
- a:=strtoint(s);
- writeln(a);
- readln
- end.
Объяснение кода листинга программы
- Импортируются модули SysUtils и Crt.
- Объявляются переменные a и s типа integer и string соответственно.
- Очищается экран с помощью функции clrscr.
- Значение переменной a устанавливается равным 123.
- Значение переменной s устанавливается равным строковому представлению значения переменной a с помощью функции inttostr.
- С помощью функции writeln выводится значение переменной s.
- Значение переменной a приводится к типу string с помощью функции strtoint.
- С помощью функции writeln выводится значение переменной a.
- С помощью функции readln считывается ввод пользователя, но данная функция вызывается без присвоения значения, поэтому она ничего не делает.
- Программа завершается.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д