А где задания?
Хотя бы фото отправить надо.
Ответ:
513:8=64(1 остаток)
64:8=8(0 остаток)
8:8=1(0 остаток)
1:8=0(1 остаток)
получаем в обратном порядке от деления остатки 1001, т.е. 513(10)=1001(8)
Объяснение:
Ответ написан в файле.
Через логическую связку and и or не получится проверял. Только построчно.
1 Вариант
var a:integer;
begin
writeln('Введите номер месяца: ');
readln(a);
case a of
1:writeln('Зима');
2:writeln('Зима');
3:writeln('Весна');
4:writeln('Весна');
5:writeln('Весна');
6:writeln('Лето');
7:writeln('Лето');
8:writeln('Лето');
9:writeln('Осень');
10:writeln('Осень');
11:writeln('Осень');
12:writeln('Зима');
end;
end.
2 Вариант
var a:integer;
begin
writeln('Введите номер месяца: ');
readln(a);
if (a=12) or (a=1) or (a=2) then writeln('зима');
if (a=3) or (a=4) or (a=5) then writeln('весна');
if (a=6) or (a=7) or (a=8) then writeln('лето');
if (a=9) or (a=10) or (a=11) then writeln('осень');
end.
Ответ:
29₁₀ = 00011101₂
-29₁₀ = 10011101₂
Объяснение:
29₁₀ = 1*2⁰ + 0*2¹ + 1*2² + 1*2³ + 1*2⁴ = 11101₂
00011101₂ - добавляем слева нули до 8 знаков
10011101₂ - отрицательное ставим 1 в старший разряд