Плз сделать по с клавиатуры одной строкой вводят имя и фамилию. составьте программу, которая: а) определяет, есть ли во введенной строке заданный символ б) копирует в новую строку имя и выводит его в) выводит сначала фамилию, а затем
var a,b,c:string; begin readln(a); readln(b); if (pos(b,a))<>0 then writeln('est simvol'); c:=copy(a,1,pos(' ',a)-1); writeln(c); writeln(copy(a,pos(' ',a)+1,length(a)-pos(' ',a)+1),' ',copy(a,1,pos(' ',a)-1)); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
