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

ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Паскаль АБС
1.Символы вводятся с клавиатуры до символа ‘.’ (точка). Вывести символы, предшествующие каждому из введенных. (Ввод: feui56HG Вывод: edth45GF)

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

    var k:char;

    s:string;

    BEGIN

    s:='';

    repeat

    read(k);

    s:=s+chr(ord(k)-1)

    until k='.';

    delete(s,pos('-',s),1);

    writeln(s);

    end.

    1. Ответ
      Ответ дан mcgoshanskyi
      Спасибо!!!
Самые новые вопросы