// 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.
Var s:string;
begin
s:='тестирование';
s:=s[8]+s[9]+s[1]+s[9];
writeln(s);
<span>end.</span>
Правильный ответ под номером 4.
Коля не читает книгу или не пьет чай
Д или не Р
14(n)+42(n)=100(n) где n - основание системы счисления.
В данном случае задача решается очень просто. Если складывать "в столбик", то мы видим в младшем разряде 4+2=0. Понятно, что на самом деле 4+2=10 и единица пошла переносом в следующий разряд. В то же время мы знаем, что 4+2=6 в привычной нам десятичной системе счисления, а 6 станет 10, если основание системы счисления равно 6.
Итак, система счисления шестиричная.
Проверка:
14
+ 42
------
100
<u>Ответ:</u> в шестиричной системе счисления.