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

Дана строка C определить какие буквы стоят на нечетных местах и вывести их

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

    var s:string;

    i:integer;

    begin

    write ('Введите строку: ');

    readln (s);

    write ('Нечётные символы: ');

    for i:=1 to length(s) do

    if i mod 2 <> 0 then write (s[i],' ')

    end.

Самые новые вопросы