Ответ:
4₁₀ = 1*2² = 100₂
8₁₀ = 1*2³ = 1000₂
16₁₀ = 1*2⁴ = 10000₂
32₁₀ = 1*2⁵ = 100000₂
64₁₀ = 1*2⁶ = 1000000₂
5₁₀ = 1*2⁰ + 1*2² = 101₂
10₁₀ = 1*2¹ + 1*2³ = 1010₂
20₁₀ = 1*2² + 1*2⁴ = 10100₂
40₁₀ = 1*2³ + 1*2⁵ = 101000₂
Объяснение:
4₁₀ = 0*2⁰ + 0*2¹ + 1*2² = 100₂
8₁₀ = 0*2⁰ + 0*2¹ + 0*2² + 1*2³ = 1000₂
16₁₀ = 0*2⁰ + 0*2¹ + 0*2² + 0*2³ + 1*2⁴ = 10000₂
32₁₀ = 0*2⁰ + 0*2¹ + 0*2² + 0*2³ + 0*2⁴ + 1*2⁵ = 100000₂
64₁₀ = 0*2⁰ + 0*2¹ + 0*2² + 0*2³ + 0*2⁴ + 0*2⁵ + 1*2⁶ = 1000000₂
5₁₀ = 1*2⁰ + 0*2¹ + 1*2² = 101₂
10₁₀ = 0*2⁰ + 1*2¹ + 0*2² + 1*2³ = 1010₂
20₁₀ = 0*2⁰ + 0*2¹ + 1*2² + 0*2³ + 1*2⁴ = 10100₂
40₁₀ = 0*2⁰ + 0*2¹ + 0*2² + 1*2³ + 0*2⁴ + 1*2⁵ = 101000₂
Задача сделана на языке паскаль, при помощи
PaskalPlus<span>
Оформление сделана как для студенческой задачи
<span>Если есть вопросы пиши в личку</span></span>
1)
//Pascal ABC.Net
Var a:array[1..4] of longint;i,min:longint;nom:byte;
Begin
for i:=1 to 4 do
read(a[i]);
min:=a[1];
nom:=1;
for i:=2 to 4 do
if (a[i]<min) then begin min:=a[i]; nom:=i; end;
for i:=1 to 4 do
if (i<>nom) then write(a[i],' ')
else begin write(a[i]*a[i],' '); nom:=0; end;
writeln;
End.
Тесты
Входные данные: 2 3 4 5
Выходные данные: 4 3 4 5
Входные данные: 10000 10001 10002 10003Выходные данные: 100000000 10001 10002 10003
2) Зарезервированные слова - проще говоря, это слова, которые нельзя указывать как имена переменных или констант. Список всех слов в языке Паскаль:
Absolute — Абсолютный
And — Логическое И
Array — Массив
Begin — Начало блока
Const — Константа
Div — Деление нацело
Goto — Переход на
Do — Выполнять
Downto — Уменьшить до
Else — Иначе
End — Конец блока
File — Файл
For — Для
Function — Функция
If — Если
Interrupt — Прервать
Interface — Интерфейс
Label — Метка
Library — Библиотека
Mod — Остаток от деления на
Not — Логическое НЕ
Or — Логическое ИЛИ
Of — Из
Object — Объект
Procedure — Процедура
Program — Программа
Repeat — Повторять
String — Строка
Then — Тогда
To — Увеличивая
Type — Тип
Until — До
Uses — Использовать
Var — Переменная
While — Пока
With — С
Xor — Исключающее ИЛИ
И т.д.
В основном при написании они все выделяются жирным шрифтом (в Pascal)
3)
1. Имя программы
2. Раздел подключения модулей
3. Раздел описаний
Begin
4. Операторы
End.
Красная площадь большой театр мавзалей малый театр
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ReadArrInteger(ReadInteger('n='));
Writeln('Нечетных двухзначнык: ',
a.Where(t->t.IsOdd and Abs(t).Between(10,99)).Count)
end.
<u>Пример</u>
n= 15
230 256 59 60 291 190 62 -234 -43 228 -154 62 -58 58 100
Нечетных двухзначнык: 2