Var a,b:real;
begin
write('Введите а и b: ');
readln(a,b);
if b=0 then
writeln('На ноль делить нельзя!')
else writeln('a/b=',a/b);
<span>end. </span>
101 0100 1010(2) = 54A(16)
BABA(16) = 1011 1010 1011 1010(2)
110 0011 0110(2) = 636(16)
CACA(16) = 1100 1010 1100 1010(2)
образуются пары родителей:
655-861 (1 реб) подходит
323-354 (1 реб) не подходит
293-238 (1 реб) не подходит
654-960 (2 реб) подходит
941-365 (2реб) не подходит
1+2=3
Среда исполнителя-совокупность условий,при которых становятся выполнимыми все известные исполнителю команды.
1 КБит = 128 Байт
5 КБит = 640 Байт