Это легко смотри ты должна сделать точно такой же в тетрадь и формулу S=a*v
19,29,39,49,59,69,79,89,99,109,129
237 в десятичной системе=11100001 в двойчной системе.
237/2=118( 1 остаток)
118/2=59(0 остаток)
59/2=28( 0 остаток)
28/2=14(0 остаток)
14/2=7(0 остаток)
7/2=3(1 остаток)
3/2=1(1 остаток)
ответ записывается СПРАВА НА ЛЕВО
Теории в интернете полно.
3) 3 раза
4) 5
5) until n>6
6)program zadanie;
uses crt;
Var
n,k,i,S: integer;
begin
clrscr;
writeln ('Введите n=');
readln (n);
for i:=1 to n do
begin
S:=S+i*i;
end;
writeln('Сумма квадратов=',S);
end.
7)program zadanie2;
uses crt;
Var
n: integer;
begin
clrscr;
writeln ('Введите n=');
readln (n);
writeln('Результат:',(5+(n-1))*n);
<span>end.</span>