Напишите программу, которая следующий образ экрана. (использование вложенных циклов обязательно) образ: * + * +

Var n,i,j: integer; begin write('n (четное) = '); readln(n); for i: =1 to n div 2 do   begin   for j: =1 to n do write('*');   writeln;   for j: =1 to n do write('+');   writeln;   end; end. пример: n (четное) = 6 ****** ++++++ ****** ++++++ ****** ++++++

var x,y,nod,nok: longint;

 

begin

 

read(x,y);

 

a: =x; b: =y;

while (a> 0) and (b> 0) do

if a> b then a: =a mod b

else b: =b mod a;

nod: =a+b;

nok: =(x div nod)*y;

 

write(nok);

 

end;

101=1*8^0+0*8^1+1*8^2=1*1+0+64=(65) в десятичной

1в=в*16^0+1*16^1=12*1+1*16=12+16=28 в десятичной

65-28=37

38 в десятичной , но такого ответа нет, значит надо перевести 37 в двоичную систему. для этого 38 делим на 2 пока делится

 

 

 

38/2=19 остаток0

19/2=9 остаток 1, уже видно что двоичный второй ответ не подходит, там нет нуля.

  попробуем переведем в восьмеричную, для этого делим 38 на 8.

38/8=4 остаток 6, получается 46 в  8 сс.  ответ 4