Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
12) 11
13) 13
Объяснение:
a-c(4)-b(2)-e(5)=11 <-- наикратчайший путь
a-c(5)-d(5)-f(3)=13 <-- наикратчайший путь
паскаль:
uses crt;
var a,b: string; \ а-слово ,b-символ
i: integer; \ переменная для счета
begin
writeln ('слово и символ');
readln (a,b); \\ввод данных
for i: =1to length(a) do if copy (a,i,1)=b then writeln (i); \\копирование по порядку символов слова а и сравнение каждого с символом b. вывод ответа. или ответов
readkey; \\если символы в слове повторяются
end.
смотри скриншот
Популярные вопросы