По шаблону ? означает ровно один любой символ, а * сколько угодно любых символов либо 0 сим. Так что ответ "e"
Var n:string;
begin
readln(n);
writeln('Число сотен: ',n[4]);
writeln('Число тысяч: ',n[3]);
<span>end.</span>
1) 151273
2) 157999
3) 256040
1.
x не кратно 4 x mod 4 <>0
-5<x<-2 (x>-5)and(x<-2)
x принадлежит [-1,5] (x>=-1)and(x<=5)
2.
uses crt;
var n1,n2,n3:byte;
begin
writeln('Введите 3 разных числа от 1 до 9 по порядку:');
readln(n1,n2,n3);
if(n2-n1=3)and(n3-n2=3)then write('На вертикали!');
readln
end.
Сесть
Взять ручку
Открыть тетрадь
Записать число и тему урока