Вот, перевод с точностью 100%
Тут есть два варианта или перевести оба числа в десятичную, а потом результат пересчитать обратно или считать в столбик, абсолютно по тем же правилам как и с десятичными числами
193.125 в 10=1x10²+9x10¹+3x10⁰+1x10⁻¹+2x10⁻²+5x10⁻³
193125 в 8=1x8⁵+9x8⁴+3x8³+1x8²+2x8¹+5x8⁰
193125 в 16=1x16⁵+9x16⁴+3x16³+1x16²+2x16¹+5x16⁰
1931.25 в 5=1x5³+9x5²+3x5¹+1x5⁰+2x5⁻¹+5x5⁻²
Номер 1
const
D: array[1..7] of string = ('Monday', 'Tuesday', 'Wednesday', 'Thursday', 'Friday', 'Saturday', 'Sunday');
var
day: longint;
begin
writeln('Введите номер дня.');
readln(day);
writeln(D[day]);
end.
Сохранить как............