Это клавиши Backspace и Delete. Delete удаляет все по правую сторону от курсора, а Backspace по левую сторону.
program z1;
var a,b,k,i:integer;
begin
k:=0;
write('Ââåäèòå êîîðäèíàòó à: ');
read(a);
write('Ââåäèòå êîîðäèíàòó b: ');
read(b);
for i:=a to b do begin
if i mod 3=0 then begin
writeln(i);
k:=k+1;
end;
end;
writeln('Количество чисел кратных трём равно ',k);
readln;
end.
2 = Джобс & Гейтс = 6.0 млн
1 + 2 = Джобс = 25.0 млн
2 + 3 = Гейтс = 40.0 млн
1 + 2 + 3 = Джобс | Гейтс = 1 + 2 + 2 + 3 - 2 = Джобс + Гейтс - Джобс & Гейтс = 25.0 млн + 40.0 млн - 6.0 млн = 59.0 млн
1. A2=144/12/12=1; B2=144/12*2=24
2. A2=144/(12*12)=1
3. 0, так как на 0 делить нельзя.
1) Переводим в двоичную систему счисления, деля число целочисленно на 2 до тех пор, пока не получится 0.
Записываем остатки от деления в обратном порядке.
1100000110011 - ответ
2)Разбиваем двоичное число на тройки, начиная с младшего разряда: [001][100][000][110][011]
Каждую тройку переводим в восьмиричную систему счисления и записываем "как есть": [1][4][0][6][3].
14063 - ответ
3)Разбиваем двоичное число на четверки, начиная с младшего разряда: [0001][1000][0011][0011]
Переводим каждую четверку в шестнадцатиричную сисиему счисления и записываем "как есть": [1][8][3][3].
1833 - ответ.