Що відбудеться після виконання наступного коду:

Form1.Left:=Form1.Left+10;

а. Форма зміститься вправо; б. Форма зміститься вгору і вліво;
в. Код містить помилку; г. Форма зміститься вліво; ​

артефакт,инстинкт,антрацит,оригинал.

var s,s1: string; n,i: integer; begin readln(s); readln(n); for i: =1 to n do begin insert(s[1],s1,length(s1)+1); delete(s,1,1); end; s: =s+s1; writeln(s); end.

на листочке чертишь круг,берешь серединку,и получается- 4 клетки вниз и 7 в право

: знайти суму всіх натуральних чисел від 1 до п. program suma 2; var i, n, s: integer; begin writeln (‘ведіть кількість натуральних чисел: ’);   write (‘n=’); readln (n);

: знайти суму всіх натуральних чисел від 1 до п. program suma 2; var i, n, s: integer; begin writeln (‘ведіть кількість натуральних чисел: ’);   write (‘n=’); readln (n);   i: =1; s: =0;   repeat     s: =s+i;     i: =i+1;   until i> n;   writeln (‘s=’,s);

  i: =1; s: =0;   repeat     s: =s+i;     i: =i+1;   until i> n;   writeln (‘s=’,s);