Var strl,str2: string; ki,k2:integer;
begin
strl:='AB CD EF GH';
str2:='Cerodha npekpacHbit deHb ';
kl:=length(str1):
k2:=length(str2);
writeln(k1,' \,(2);
end.
Что получитсчя​

avruchka7    3   17.11.2020 12:56    0