Program HelloWorld;var s:string; i:integer;begin s:='qweasdz'; if(length(s) mod 2=0) then i:=length(s) else i:=length(s)-1; while(i>0) do begin delete(s,i,1); i:=i-2; end; writeln(s);end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку