Паскаль. Определить, есть ли в строке цифра 9. Стоит ли она в конце строки?
Помогите, пожалуйста.

Можно без него

Можете сделать без него?

Да, так попроще, большое спасибо!

Не за что

boolean не оператор -_-

это программа медленнее чем моя о боже -_-

И флаг тебе в руки)

Не расстраивайтесь, я просто не проходила ещё задачи с применением boolean, а так ваш способ компактнее, хоть и более понятен мне всё равно способ "Abac250". Спасибо вам.

да ладно) пройдешь, поймешь :D

Var s:string; i,k:integer; b:boolean;beginreadln(s); b:=false;for i:=1 to length(s) doif s[i]='9' then begin k:=i; b:=true; end;if b=true then writeln('в строке есть 9');if k=length(s) then writeln('9 в конце строки') elsewriteln('9 нет в конце строки');end.

program E02;  uses crt;    var S: string;        i,n,k: integer;begin  clrscr;  writeln('Введите строчку: ');  readln(S);    K:=0;    for i:=1 to length(S) do    if S[i] = '9' then      K:=i;      if K <> 0 then    writeln('Yes 9!')  else    writeln('No 9!');      if K = length(S) then    writeln('Да есть 9 в конце строки!')  else    writeln('Нет 9 в конце строки!');end.