Иллюстрацияға гиперсілтеме қалай кірістіріледі

program zadacha6; var a,b: real; begin readln(a,b); if a> b then writeln (a) else writeln (b); end.

не? я не уверен

бег - бог - бок - бак - мак - маг -шаг

var x,s,n: integer;

begin

  repeat

        read(x);

        if x< 0 then n: = n +1;

        if x > 0 then s: =s+x;

  until x=0;

  writeln(n,s);

end.

лексикогрфический порядок: сравниваются первые буквы, если они однаковы, то вторые, третьи и т.д.

баскетбол

гимнастика

гитара

канал

посетить

почерк

расчёт

расчётливый

спортсмен

справа

справедливый

чехол

шоссе

шофёр