48+6=54
28+24=52
только такие могут получится
78:
Прямой код: 01001110
Обратный: Для положительного числа нет обратного кода.
-49:
Прямой код: 00110001
Обратный код: ( единицы прямого кода заменяются на нули, а нули на единицы): 11001110
<em>Pascal</em>
var x,s:real;i:integer;
begin
s:=0;
for i:=1 to 10 do
begin
read (x);
s:=s+x;
end;
writeln (s);
end.
Блок-схема - в прилагаемом файле.
Программу Вам написали правильно:
var
i, p: integer;
begin
p := 1;
for i := 4 to 7 do p := p * i;
writeln('P = ', p);
end.
Результат:
P = 840