Рассмотрите любой стиль символов, информатика 7 класс

нам это тоже задовали под буквой а я тож не знаю,а вот под буквой б напишу

program prim;

var i,sum,n,x   : integer;

begin

    write('n = ');

    readln(n);

    x: =2;

    sum: =2;

    i: =1;

    while sum< =n do

    begin

    x: =x+2;

    i: =i+1;

    sum: =sum+x;

end;

    writeln(i,'слагаемых');

end. 

запишу на обычном языке, паскаль не помню уже.

а - первое число. б - второе число.

если а больше б и б div 5=0 тогда выводится на экран (' б наименьшее число и нацело делится на 5')

если б больше а и а div 5=0 тогда выводится на экран (' а наименьшее число и нацело делится на 5')

точно не помню как выглядит это в паскале, но что-то типо такого

if a< b and a div 5=0 then writeln ('а наименьшее число и нацело делится на 5');

if b< a and b div 5=0 then writeln ('б наименьшее число и нацело делится на 5');

program dl9_aniasss;

var c: real;

begin

writeln ('vvedit c');

readln (c);

c: =c*2;

writeln (c,'*2=',c);

readln

end. 

16 ног-8 голов-матр

1нога -1 гол капитан

24 лапы- 6 голов

41 нога- 15 голов