Сканируется цветное изображение размером 22 целых 86 на 22 целых 86 расширяющая экрана 600 на 1200 dpi глубина цвета 24 бита какой информационный объем будет иметь полученный фаил
Int gcd(int a, int b){ return b ? gcd(b, a%b) : a; } Это красивая реализация в виде тернарной строчки. Рекурсивная функция.
int gcd(int a, int b){ if (b) return gcd(b, a%b); else return a; } Это тоже рекурсивная функция, просто не с тернарной строчкой, а с ифом.
int gcd(int a, int b){ while (b){ swap(a,b); b%=a; } return a; } Это реализация циклом. Нерекурсивная функция.
Вот, среди них можешь выбрать любую функцию, которая тебе больше нравится. Теперь программа. #include<iostream> using namespace std; int gcd(int a, int b){ //скопипастишь любую понравившуюся } int main(){ int a,b,c,d; cin>>a>>b>>c>>d; cout<<gcd(gcd (a,b), gcd(b,c)); return 0; }
// PascalABC.NET 3.3, сборка 1625 от 17.01.2018 // Внимание! Если программа не работает, обновите версию!
function aToDec(n:string;k:integer):integer; // Перевод из системы по основанию k в десятичную begin var s:='0123456789ABCDEF'; Result:=0; var pa:=1; for var i:=Length(n) downto 1 do begin Result+=pa*(Pos(n[i],s)-1); pa*=k end end;
function DecToa(n,k:integer):string; // Перевод из десятичной системы в систему по основанию k begin Result:=''; while n>0 do begin var r:=n mod k; if r<10 then Result:=r+Result else Result:=Chr(Ord('A')+r-9)+Result; n:=n div k end end;
function AtoB(s:string;A,B:integer):string; // Перевод из системы по основанию A в систему по основанию B begin Result:=DecToa(aToDec(s,A),B) end;
begin var n:=ReadlnString('Какое число перевести?'); var (a,b):=ReadInteger2('Исходное и результирующее основания:'); Writeln(n,'(',a,') = ',AtoB(n,a,b),'(',b,')'); end.
Пример Какое число перевести? 2018 Исходное и результирующее основания: 10 16 2018(10) = 7E2(16)
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку