Если знаешь только стандартную(10тичную) таблицы умножения-сложения, то работай через неё
10h=16
10(8)=8
10b=2
Поэтому выражение равно 16+8*2=32=2^5=10 0000b
While (a < -1) and (a > -1) do
Тело этого цикла никогда не будет выполнено даже один раз.
Условие требует, чтобы значение a было ОДНОВРЕМЕННО меньше -1 И БОЛЬШЕ -1.
<span>Program Integer_1;
var l,k: integer;
begin
write ('Значение L:');
readln (l);
k := l div 100;
write ('Количество полных метров: ',k,'.');
end<span>.</span></span>
1 задача : Коля, Оля, Саша, Вася, Петя.
Var summ: integer;
begin for var i:=30 to 100 do begin if (i mod 3) = 0 then summ := summ + i; end; writeLn('сумма = ', summ);end.