Надо что обозначает клавиша ctrl+home

Переход к началу редактируемого дакумента

Допустим в ворде нажатие ctrl+home переместит курсор в начало документа. 

Var               r1, r2, r3, s1, s2, s3: integer;               begin                         writeln('введите размеры рации и чемодана');                         readln(r1, r2, r3, s1, s2, s3);                           if ((r1 < s1) and (r2 < s2) and (r3 < s3)) or                         ((r3 < s3) and (r2 < s1) and (r1 < s2)) or                         ((r1 < s1) and (r2 < s3) and (r3 < s3)) or                         ((r2 < s2) and (r1 < s3) and (r3 < s1)) or                           ((r2 < s1) and (r3 < s2) and (r1 < s3)) or                         ((r1 < s2) and (r3 < s1) and (r2 < s3)) then writeln('помещается')     else writeln('не помещается'); end.

ответ:

что то типа того, попробовал проверять, вроде работает

объяснение:

program example;

var

d,c,a,h: real;

b : real;

function calculate(d,c,a,h: real): real;

    var  

        notation: real;

    begin

 

       

        notation : = c + abs(cos(a*h*h)-sin(a*h));

        calculate : = d - sqrt(c/notation);

       

       

end;

 

begin  

readln(d,c,a,h);

 

b : = calculate(d,c,a,h);

    write(b);

end.