<span>Random это функция</span><span> возвращающая случайные числа от 1 до указанного диапазона, но отрицательных чисел тут нет, так что воспользуемся приемом:</span>
A: = Random(101)-50; {Числа от -50 до 50}
B: = Random(101)-200; {от -100 до 100}
<span>А теперь выведи на экран все положительные, а затем отрицательные элементы - проверяй на больше/меньше нуля!</span>
Байт - 8 бит, делим на разряды по 8.
11010011
00011100
11010011
00011100
01010111
5 последовательностей из которых 3 различны.
Ответ 3
Ну а чего тут писать то... как бы ты отняла 153 от 875 ?
875-153 ..: в позиционной системе счисления(которой является десятичная система_то есть от позиции зависит значение числа...) алгоритм таков..: 1) отнимаем единицы _если единиц не хватает то занимаем у десятков(10 единиц занимаем)... отнимаем 2) отнимаем десятки..если десятков не хватает занимаем десятки у тысяч (10 сотен занимаем) ... и так далее в зависимости от того на сколько длинные числа...
вообще говоря десятичную системы проходят на всем курсе математики... почему вы не знаете алгоритм _как вычесть из одного числа другое _это очень странно...а как сдачу считать в магазине?)
program z8;
uses crt;
var
i,k,n:byte;
s:integer;
sa:real;
begin
clrscr; i:=1;
writeln('Для завершения последовательности нажмите ноль');
while i>0 do begin
read(i);