Перевести код из pascal в python var x: real; i: integer; begin repeat write('1 < x < = 13; x = '); readln(x) until (1 < x) and (x < = 13); i : = 0; while x > 0 do begin inc(i); x : = x - 1 / i end; write('n = ', i - 1, ', m = '); if x = 0 then inc(i); writeln(i); readln end.
Двухзначное число может быть записано в с/с по основанию n следующим образом: na+b. По условию число оканчивается цифрой 8 и его значение равно 30. Получаем уравнение:
na+8=30 ⇒ na=22.
Раскладываем 22 на простые множители: 22=1х2х11
Решение уравнения в целых числах при условии n>8 дает два варианта ответов:
(n=11, a=2), (n=22, a=1).
Это порождает два числа:
Существует ли с/с по основанию n, в которой запись числа 30 будет одноразрядной?
Уравнение 8n=30 не имеет решений в целых числах, поэтому такой с/с не существует.
ответ: 30(10)=18(22)=28(11).
x,y:integer;
vcp,dx,dy:real;
begin
Write('Возраст Тани='); Read(x);
Write('Возраст Мити='); Read(y);
vcp:=(x+y)/2;
dx:=x-vcp; dy:=y-vcp;
Writeln('Средний возраст равен ',vcp);
if dx>0 then begin
Writeln('Таня старше среднего возраста на ',dx,' лет,');
Writeln('а Митя младше среднего возраста на ',-dy,' лет.')
end
else
if dx=0 then Writeln('Таня и Митя ровесники')
else begin
Writeln('Таня младше среднего возраста на ',-dx,' лет,');
Writeln('а Митя старше среднего возраста на ',dy,' лет.')
end
end.
Тестовое решение:
Возраст Тани=15
Возраст Мити=12
Средний возраст равен 13.5
Таня старше среднего возраста на 1.5 лет,
а Митя младше среднего возраста на 1.5 лет.