с акр по информатике​

64 = 1000000

-120 = -1111000

-96 = -1100000

57 =  111001

вот конвертер:

квадрат вписан в круг при условии что r*2(диаметр)> диагонали квадрата 

на qbasic

? "введите 2 числа - радиус круга и сторону квадрата соответсвенно"

input a; b

c=a*2   диаметр

g=sqr(a*a+a*a) диагональ  

if c> g then 1 else 2

1 ? "квадрат вписан в круг"

goto 3

2 ? "квадрат не вписан в круг"

3 end

не знаю в каком виде это должно быть

1 ввод возрастов

2 если s> m то пишем "саша старше маши "

3 иначе если s=m то пишем "саша и маша ровестники"

4 иначе пишем "маша старше саши"

в первом нет строчки 3

var a: array[1..15] of char;

i,min,max: integer;

begin

  min=1;

  max=1;

  for i: = 1 to 15 do begin

      a[i]: = chr(random(256));

      if a[min]> a[i] then min: =i;

      if a[max]< a[i] then max: =i;

  end;

  writeln(a[min], a[max]);

end.