Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
var a,s : string;
i: integer;
begin
writeln ('введите слово и символ-');
readln (s,a);
for i: =1 to length(a) do
if copy (s,i,1)=a then writeln (i);
readln
end.
файл, правка, вид, вставка, формат, сервис, таблица, окно, справка.
1695-1696 – пётр первый делал свои знаменитые азовские походы.
1703 – пётр первый основал санкт-петербург. событие произошло 16 мая.
1709 – была полтавская битва, она произошла 27 июня.
пе́рвая мирова́я война́(28 июля 1914 — 11 ноября 1918 гг)
5`120`000 бит = 640 000 байт = 625 кб
Популярные вопросы