4 года назад

33+22+16+5=100 Все числа в системе счисления х. Нужно найти х.

Знания

Информатика

1 ответ:

Diman 123454 года назад

0 0

Система счисления восьмеричная.

При сложении единиц каждого числа(т.е. 3 + 2 + 6 + 5) = 16, значит основание системы является делителем числа 16, значит основание системы = 1 или 2 или 4 или 8 или 16, но так как в записи чисел присутствует число 6, то основания могут быть либо 8, либо 16, далее складываем числа в каждой системе и выясняем, что основание системы = 8.

Читайте также

В коридоре лежат принадлежащие пришедшим на праздник четырем девочкам сумочки (розовая, голубая, черная и белая) и зонтики (розо

Anela

Если не поймешь, куда какая буква - напиши в лп

0 0

4 года назад

Сделать так чтобы Writeln был заменен другим словом и повторялься не больше двух раз program choise; var N_M:integer; writeln('

ESL Ren

Var month: array[1..12]of string[10]=
(' январь ',' февраль ',' март ',' апрель ',' май ',' июнь ',
' июль ',' август ',' сентябрь ',' октябрь ',' ноябрь ',' декабрь ');
procedure p(s:string);
begin
writeln(s);
end;
var N_M:integer;
begin
writeln(' введи номер месяца ');
readln(N_M);
case N_M of
1..12: p(month[N_M]);
else p(' такого месяца нет ');
end;
case N_M of
1,3,5,7,8,10,12: p(' 31 день ');
4,6,9,11: p(' 30 дней ');
2: p(' 28 дней ');
end;
case N_M of
12,1,2: p(' зима');
3,4,5: p(' весна');
6,7,8: p(' осень');
9,10,11: p(' лето');
end;
end.

Пример:
<span> введи номер месяца
5
май
31 день
весна</span>

0 0

4 года назад

Дано двузначное число. Получить число, образованное при перестановки цифр заданного числа числа

kowka666 [712]

Var a,b:integer;
begin
writeln('Введите число');
readln(a);
b:=(a mod 10)*10+(a div 10);
writeln('Ответ');
writeln(b);
end.

0 0

4 года назад

Запишите на языке Паскаль программу,которая формирует и выводит на экран строку символов,коды которых равны 66,69,71,79,78

Lolilololilko [17]

Var s:string;
begin
s:=chr(66)+chr(69)+chr(71)+chr(79)+chr(78);
writeln(s);
end.

Результат:
BEGON

0 0

4 года назад

Помогите, пожалуйста, ответить. Буду чрезмерно благодарен. Есть ли ошибка в использовании знака присвоения ":=" в представленном

Марина Горянцева [7]

Ошибки нет.
В условном операторе после if пишется <условие> (в данном случае "x=100"), а после then - <оператор> (в данном примере это оператор присваивания "y:=x*x;")

0 0

4 года назад