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

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

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

Подключаю SysUtils дабы использовать ф-ции
Листинг программы
  1. StrToInt
и
Листинг программы
  1. IntToStr
, но выдает ошибку Fatal: Syntax Error, "BEGIN" expected but "identifier SYSUTILS". Вот части кода:
Листинг программы
  1. Uses crt; SysUtils;
Листинг программы
  1. n:=StrToInt(nn);
В чем может быть проблема?

Решение задачи: «USES SysUtils и ошибка Syntax Error, "BEGIN" expected but "identifier SYSUTILS"»

textual
Листинг программы
  1. uses SysUtils,crt;
  2. var a:integer;
  3.     s:string;
  4. begin
  5. clrscr;
  6. a:=123;
  7. s:=inttostr(a);
  8. writeln(s);
  9. a:=strtoint(s);
  10. writeln(a);
  11. readln
  12. 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

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут