var
s: string;
begin
readln(s);
writeln(s[3], s[7], s[9]);
<span>end.</span>
Вот так записывается: sqr(22+z)
<span>мегабайт содержит <span>1024 килобайта.
1024/2=512
512+1024=1536 кб</span></span>
begin
ReadInteger('num =').ToString.ToCharArray
.IndexesOf(x -> x = '7').Select(x -> x + 1).Println;
end.
Там есть программная кнопка,внимательней смотри.