USES SysUtils и ошибка Syntax Error, "BEGIN" expected but "identifier SYSUTILS" - Free Pascal

Узнай цену своей работы

Формулировка задачи:

Подключаю SysUtils дабы использовать ф-ции
StrToInt
и
IntToStr
, но выдает ошибку Fatal: Syntax Error, "BEGIN" expected but "identifier SYSUTILS". Вот части кода:
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.

Объяснение кода листинга программы

  1. Импортируются модули SysUtils и Crt.
  2. Объявляются переменные a и s типа integer и string соответственно.
  3. Очищается экран с помощью функции clrscr.
  4. Значение переменной a устанавливается равным 123.
  5. Значение переменной s устанавливается равным строковому представлению значения переменной a с помощью функции inttostr.
  6. С помощью функции writeln выводится значение переменной s.
  7. Значение переменной a приводится к типу string с помощью функции strtoint.
  8. С помощью функции writeln выводится значение переменной a.
  9. С помощью функции readln считывается ввод пользователя, но данная функция вызывается без присвоения значения, поэтому она ничего не делает.
  10. Программа завершается.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 4.067 из 5