Ты говоришь:
пока i < длины строки S делай:
если S с индексом i = "." то k++
Все
Ты не меняешь "i", он у тебя всегда 1й элемент смотрит)
Как должно быть:
------------------
While i<=length(s) do begin
If s[i]='.' then
k:=k+1;
inc(i);
end;
----------------------
1 Том Сойер второе 2 открытый паровоз 3 Вторая мировая война 3 шарлыкском и ищет Улики 4 и Снежная королева и пятое Мария вместе с водителем Сапсана Ваней
Ответ: <span>составная часть презентации,содержащая различные объекты,называется слайд
</span>
2 В связи с этим первое, на что стоит обратить свое внимание это надежность. Любая система для хранения данных должна предусматривать частичное либо полное резервирование таких компонентов ка блоки питания, процессорных модулей, путей доступа, дисков и т.д. обязательным требованием считается также наличие мониторинга и множество способов для оповещения о различных проблемах.
Второе требование, которое должно учитываться при работе системы хранения данных это доступность всех данных. Именно она обеспечивается заранее разработанными функциями для того чтобы сохранить целостность данных.
3