1.
Var A,B : Integer;
Begin
Readln(A,B);
If A>B then Writeln(A,' ',B*B) else Writeln(B,' ',A*A)
end.
2.
Var A : Byte;
Begin
Readln(A);
Case A of
1..3 : Writeln('Первый квартал');
4..6 : Writeln('Второй квартал');
7..9 : Writeln('Третий квартал');
10..12 : Writeln('Четвертый квартал');
end;
end.
Складемо алгоритм переходу вулиці.
Алгоритм Перехід
1.Подивитися ліваоруч.
2.Якщо немає перешкоди,то йти до середини вулиці,інакше пропустити машини,йти до середини вулиці.
3.Подивитися праворуч.
4.Якщо немає перешкоди,то завершити перехід,інакше пропустити машини,завершити перехід.
Попробуем порассуждать:
Сова сказала, что это пятачок, значит это не она.
Сову спрашивал кролик - значит тоже не он.
И остается пятачок, значит это он подарил подарок.
Алгоритм перевода чисел из восьмеричной в десятичную систему счисления аналогичен уже рассматривавшемуся нами в разделе Перевод чисел из двоичной системы в десятичную. Различие состоит лишь в том, что для восьмеричной системы счисления основанием является число 8, а правило перевода в данном случае может быть сформулировано в следующем виде:
Для перевода восьмеричного числа в десятичное необходимо это число представить в виде суммы произведений степеней основания восьмеричной системы счисления на соответствующие цифры в разрядах восьмеричного числа.
Например, требуется перевести восьмеричное число 2357 в десятичное. В этом числе 4 цифры и 4 разряда ( разряды считаются, начиная с нулевого, которому соответствует младший бит). В соответствии с уже известным нам правилом представим его в виде суммы степеней с основанием 8:
<span>23578 = (2·83)+(3·82)+(5·81)+(7·80) = 2·512 + 3·64 + 5·8 + 7·1 = 1263<span>10</span></span>