Во время выполнения алгоритма сменяются следующие значения:
a=5 b=4
b=80
a=25
Ответ: a=25
Yo no puedo escribir en ruso.
Var s,r,k: string;
j: integer;
begin
write('строка: '); readln(s);
foreach k in s.Split(' ').Distinct do
begin
j:=0;
foreach r in s.Split(' ') do
if r=k then j:=j+1;
writeln('слово ','"',k,'"',' встречается ',j,' раз');
end;
<span>end.
</span>
Система условных знаков для представления информации - это КОД (например, буквы, цифры и т.п.)
Ответ только на первую задачу.
крестик в таблице это не подходящая фамилия.