Question

Могите пожалуйста!!! программа PascalABC.NET пишет "Ошибка времени выполнения .Входная строка имела неверный формат" в строке readln(s) в этой программе:var s:integer; c:char;beginwriteln('Введите символ s');readln(s);s:= ordAnsi(c);writeln('Код введённого символа - ', s);end​

Answer 1

Ответ:

Объяснение:

Во-первых, если Вы пишете в PascalABC.NET, можно писать это проще и короче, не заморачиваясь с типами данных.

begin

 var c := ReadlnChar('Введите символ s');

 var s := OrdAnsi(c);

 Writeln('Код введённого символа - ', s)

end.

Во-аторых, если Вы все же хотите в современном PascalABC.NET писать, как в Delphi образца 2005 года, пишите хотя бы правильно:

var

 s:integer;

 c:char;

 

begin

 writeln('Введите символ s');

 readln(c);

 s:= ordAnsi(c);

 writeln('Код введённого символа - ', s);

end.

Answer 2

Программа PascalABC.NET выдает ошибку времени выполнения с сообщением "Входная строка имела неверный формат" потому, что вы пытаетесь прочитать входные данные в переменную s, которая объявлена как integer, хотя вы пытаетесь ввести символ вместо числа.

Если вашей целью является чтение символа и получение его кода ASCII, вам следует изменить тип переменной s на char, а также внести несколько изменений в код. Вот исправленная версия программы:

pascalCopy code
var
  c: char;
  s: integer;

begin
  writeln('Введите символ c');
  readln(c);
  s := ord(c);
  writeln('Код введённого символа - ', s);
end.

В этой версии кода, мы сначала считываем символ c с помощью readln(c). Затем мы используем функцию ord, чтобы получить код ASCII этого символа и присваиваем его переменной s. Затем выводим код символа на экран с помощью writeln.

Обратите внимание, что вам нужно ввести только один символ. Если вводится строка, программа возможно выдаст ошибку или возьмет только первый символ строки.