Осн. 2 -> Осн. 8 -> Осн. 10 -> Осн. 16
101010 -> 52 -> 42 -> 2A
1010111 -> 127 -> 87 -> 57
101000111 -> 507 -> 327 -> 147
101010 -> 52 -> 42 -> 2A
И вообще, просто скажу как решать: из общей стоимости вычитаешь стоимость первого товара и получаешь стоимость второго товара
Var i,n: integer;
begin
n:=1;
for i:=1 to n do begin
n:=n*i;
end;
writeln (n);
end.
Программа выводит сами числа и их квадраты
Program Square5;
Uses crt;
var i:integer;
begin
clrscr;
for i:=1 to 5 do
writeln(i,' ',i*i );
readkey;
end.
Файл, папка, ярлык, рабочий стол, панель задач