Дано слово "форматирование".
Используя все возможные сначала функции, а потом процедуры получить как можно больше новых слов.
Слова составляются на паскале с помощью функций copy, lenght и pos; и процедур delete, insert, str и val.

Var s,d,f,z:string; i,n:integer;
begin
write(Введите текст);Readln(s);
//s:=форматирование;
n:= length(s);
for i:= 1 to n do begin
if i <6 then begin z:= z + s[i];end;end;
writeln(z);
f:= copy(s,2,4);
writeln(н +f);
delete(s,1,2);insert(ka,s,1);f:= copy(s,1,5);writeln(f);end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку