Определить, чему равно значение переменной S после выполнения программы, представленной в виде блок-схемы, если начальное значение N равно 5. Составить трассировочную таблицу.

151

198

Посмотреть ответы 1

Ответы на вопрос:

matisina48

Информатика

4,5(97 оценок)

Const l: array[1..26] of char = ('a','b','c','d','e','h','i','j','k','l','m','n','o','p','q','r','f','s','t','u','v','w','x','i','y','z'); var s: string; j,i,k: integer; a: array [1..100] of integer; begin readln(s); k: =0; for i: =1 to length(s) do for j : = 1 to 26 do if s[i] = l[j] then begin a[j]: =a[j]+1; end; for i: =1 to 26 do begin if a[i]< > 0 then writeln(l[i], ' = ', a[i]); end; end.