Ответы
Ответ дал:
0
program raf105;
var s,s1:string;
begin
s:= 'Моделирование';
s:= lowercase(s);
s1+= copy(s,1,3) + copy(s,10,1);
writeln(s1);
s1:= '';
s1+= copy(s,5,2) + copy(s,3,2) + copy(s,7,1);
writeln(s1);
s1:= '';
s1+= copy(s,3,1) + copy(s,2,1) + copy(s,1,1);
writeln(s1);
s1:= '';
end.
Язык PascalABC
Вас заинтересует
2 года назад
3 года назад
8 лет назад
8 лет назад
9 лет назад