Ответы на вопрос:
переменная chp должна быть типа integer. и нужно исправить строку s[1]: =chp; на строку s[1]: =s[chp];
uses crt;
var a,n,code,chp: integer;
var s: string;
var ch1: char;
begin
writeln('введи число, первые и последние цифры поменяются местами');
readln(a);
str(a,s);
ch1: =s[1];
chp: =length(s);
s[1]: =s[chp];
s[chp]: =ch1;
val(s,n,code);
writeln('из числа ',a,' получилось число ',n);
end.
Популярно: Информатика
-
Abdul1804.02.2021 16:45
-
wiamous102.09.2022 10:29
-
nataliakonstan123.04.2021 07:26
-
alinapal23.12.2021 01:33
-
Иисус123426.05.2022 21:18
-
лиза269918.02.2023 17:54
-
sanya334401.05.2020 22:50
-
dfghngh11.06.2023 15:26
-
stilist201115.09.2021 23:35
-
grimm330066Flippoo28.07.2021 03:28