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

Question

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

Kovalenko2001N · Answer

var s:string;i:integer;beginwrite ( Введите строку: );readln (s);write ( Нечётные символы: );for i:=1 to length(s) do if i mod 2 0 then write (s[i], )end....

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

Популярные вопросы