А где оно ??я его не вижу !!!!!
Ответ:
Объяснение:
var i,j:integer;
begin
for i:=1 to 5 do begin
for j:=1 to 5 do write(j);
Writeln();
end;
end.
var
t : string := 'операция';
begin
writeln('до ', t);
delete(t, 8, 1);
delete(t, 6, 1);
delete(t, 3, 1);
delete(t, 1, 1);
insert('в', t , 4);
insert('ло', t , 6);
writeln('после ', t)
end.
Начальное положение - точка (-9,-1). После каждого цикла происходит смещение на вектор (1,1)- после 3 циклов на (3,3) , чтобы конечное положение оказалось (-6,2), начальное должно быть (-9,-1).