Регистрация
tanyakill9087
24.05.2023 13:31
Информатика
Есть ответ 👍

Запишите последовательность 30 чисел натурального ряда , начиная от единицы , для позиционных систем с основаниями 2,3,5,8

105
491
Посмотреть ответы 2

Ответы на вопрос:

fira910902fira
fira910902fira
4,7(54 оценок)

в 2:

1 10 11 100 101 110 111 1000 1001 1010 1011 1100 1101 1110 1111 10000 10001 10010 10011 10100 10101 10110 10111 11000 11001 11010 11011 11100 11101 11110

в 3:

1 2 10 11 12 20 21 22 100 101 102 110 111 112 120 121 122 200 201 202 210 211 212 220 221 222 1000 1001 1002 1010

в 5:

1 2 3 4 10 11 12 13 14 20 21 22 23 24 30 31 32 33 34 40 41 42 43 44 100 101 102 103 104 110

в 8:

1 2 3 4 5 6 7 10 11 12 13 14 15 16 17 20 21 22 23 24 25 26 27 30 31 32 33 34 35 36

bauer2002
bauer2002
4,8(36 оценок)

Program sravnenie;

var a,b,c: real;

begin  

  readln(a,b);

  if a>b then c:=a

  else c:=b;

  writeln('Наибольшее число:', c);

end.

Program abc;

var a,b,c:real;

begin

 Write('Введите первое число:');readln(a);

 Write('Введите второе число:');readln(b);

 Write('Введите третье число:');readln(c);

 

 if a<0 then a:=sqr(sqr(a)) else a:=sqr(a);

 if b<0 then b:=sqr(sqr(b)) else b:=sqr(b);

 if c<0 then c:=sqr(sqr(c)) else c:=sqr(c);

 Writeln(a);Writeln(b);Writeln(c);

end.

Популярно: Информатика