Dota procedūra
proceduremix(teksts:string);vari,garums:integer;temp:char;begingarums:=length(teksts);fori:=1togarumsdoif(imod2=0)thenbegintemp:=teksts[i];teksts[i]:=teksts[i1];teksts[i1]:=temp;end;writeln(teksts);end;
 
Šī procedūra tikai izmantota ar mix('mazuts').
 
Izvēlies variantu, kas atbilst izvadītajam tekstam!
Lai iesniegtu atbildi un redzētu rezultātus, Tev nepieciešams autorizēties. Lūdzu, ielogojies savā profilā vai reģistrējies portālā!