Определи значение переменной a после выполнения фрагмента алгоритма при a=4 и a=13. Ввод а
если a>5
то a:=a+20
иначе a:=a*10
всё

ответ: при a=4 значение переменной a равно
, при a=13 значение переменной a равно
.

Подставляем значение а.

1) a=4

если 4>5 то a:=4+20 иначе a:=4*10

Утверждение ложно, выполняется то, что после "иначе". a:=4*10 = 40

2) a=13

если 13>5 то a:=13+20 иначе a:=13*10

Утверждение истинно, выполняется то, что после "то". a:=13+20 = 33

если что-то будет не так - напиши, испралю. у меня простог нет возможности проверить, выполняется  

program string_7; var s: string; k,l,i: integer; begin write('введите строку: '); readln(s); k: =0; l: =0; for i: =1 to length(s) dobegin if s[i]='н' then k: =k+1; if s[i]='м' then l: =l+1end; writeln('н=',k); writeln('м=',l); if k> l then writeln ('больше букв н'); if k< l thenwriteln ('больше букв м'); if (k = 0) and (l = 0) thenwriteln ('таких букв нет'); end.

так будет элсе выкидывало бы что букв н больше, если бы ни м ни н не встретилось))

389 365 402 201

триста восемьдесят девять миллиардов триста шестьдесят пять миллионов четыреста две тысячи двести один