profile
Опубликовано 6 лет назад по предмету Информатика от Indweys

Pascal Написать программу проверяющую есть ли в заданном слове две подряд идущие одинаковые буквы

  1. Ответ
    Ответ дан DanekPTK

    Ответ:

    Объяснение:

    readln(arr);

    for i := 0 to Length(arr) do

    if (arr[i] = arr[i+1]) then writeln("Есть две буквы подряд");