Ответ:
Я думаю CTRL
Типо ctrl+c ctrl+v или как-то так
а 45 , 34 4,8 [ 1 направить на 2 ] ну
1.а)
// PascalABC.NET 3.1, сборка 1256 от 21.06.2016
begin
case ReadInteger('Номер месяца (1-12):') of
1,2,12:Writeln('Зима');
3..5:Writeln('Весна');
6..8:Writeln('Лето');
9..11:Writeln('Осень');
else Writeln('Неверный номер месяца')
end
end.
<u>Вариант "для школьников"</u>
// PascalABC.NET 3.1, сборка 1256 от 21.06.2016
var n:integer;
begin
Write('Номер месяца (1-12): '); Read(n);
case n of
1,2,12:Writeln('Зима');
3..5:Writeln('Весна');
6..8:Writeln('Лето');
9..11:Writeln('Осень');
else Writeln('Неверный номер месяца')
end
end.
Ответ:
Вот держи
Объяснение:
1)65 = 0100 0001
2)-87 = 1101 0111
3) 1001 1010
4) 0100 1001
5)1000 0000 0010 0001
6)0100 0000 0001 1111
вроде так, но перепроверь.