Ввести с клавиатуры строку.вывести на экран 2 слово.

smorodina83 smorodina83    3   20.03.2019 01:20    0

Ответы
imaya88 imaya88  26.05.2020 06:03

var a:string;

begin

readln(a);

a:=copy(a,pos(' ',a)+1,length(a)-pos(' ',a));

a:=copy(a,1,pos(' ',a));

writeln(a);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика