var i:integer; var slovo:string; begin write('Vvedite slovo: '); readln(slovo); for i:=1 to length(slovo) do slovo:='*'+slovo+'*'; writeln(slovo); readln; end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
