Question

Символьные строки. Определить каким по счету символом является буква “у” в символьной строке “Я люблю информатику”. Написать программу в паскале. 90 баллов. Прошу без спама. Только полные ответы, иные буду блокировать, спасибо.

Answer 1

Ответ:

Дан в прикрепленных вложениях. В первом решении используется встроенная функция pos для нахождения позиции подстроки в строке, во втором это реализовано при помощи цикла for для ручной проверки по строке.

Answer 2

Конечно, вот программа на Pascal, которая определяет порядковый номер символа "у" в строке "Я люблю информатику":

pascalCopy code
program FindCharacterPosition;
var
  str: string;
  targetChar: char;
  position: integer;
  i: integer;
begin
  str := 'Я люблю информатику';
  targetChar := 'у';
  position := 0;

  for i := 1 to Length(str) do
  begin
    if str[i] = targetChar then
    begin
      position := i;
      break; // Выходим из цикла, как только нашли символ
    end;
  end;

  if position <> 0 then
    writeln('Символ "', targetChar, '" находится на позиции ', position)
  else
    writeln('Символ "', targetChar, '" не найден в строке');
end.

Этот код определит позицию буквы "у" в строке "Я люблю информатику" и выведет соответствующее сообщение.