Var a,b:integer;
begin
write('a = '); readln(a);
b:=(a div 100)*100 + (a mod 10)*10 + (a div 10 mod 10);
writeln('b = ',b);
end.
Пример:
a = 123
b = 132
Переводим числа в двоичную систему счисления. Получаем:
а) 01000001 10000000 11111111 00001100
б) 11000000 00110000 00000000 00011000
<span>При нахождении наибольшего общего делителя отрицательные числа можно заменить их абсолютными величинами, то есть, НОД(−585, 81, −189)=НОД(585, 81, 189). Разложения чисел 585, 81 и 189 на простые множители имеют соответственно вид585=3·3·5·13, 81=3·3·3·3 и 189=3·3·3·7. Общими простыми множителями этих трех чисел являются 3 и 3. Тогда НОД(585, 81, 189)=3·3=9, следовательно,НОД(−585, 81, −189)=9.</span>Ответ:<span>НОД(−585, 81, −189)=9.</span>
Var a,b,c:integer;
begin
c:=1;
for a:=5 downto 2 do begin
for b:=5 downto c do begin
write(a);
end;
writeln('');
c:=c+1;
end;
end.
Иуееиу,у меня так получилось,правильно?
еиу заменяем цифрами 012
нам надо найти слово которое стоит на 411 месте
на 411 месте должно быть 410 (т.к. первое число 000000)
410/3=136(2) в скобках остаток, на 3 т.к. 3 буквы
136/3=45(1)
45/3=15(0)
15/3=5(0)
5/3=1(2)
1/3=0(1) -> 120012 ->иуееиу