Program z6; Var a: array [1..10] of string; i,j,l:integer; s,g,s_2:string;Begin write('Введите строку - '); readln(s); l:=s.Length; i:= 1; j:= 1; while i <= l do begin while (s[i] <> ' ') and (i <= l) do begin a[j]:=a[j] + s[i]; i:= i + 1; if (i > l) then break; end; j:= j + 1; i:= i + 1; end; i:= 1; while (a[i] <> '') do begin g:=a[i]; g[1]:= (Upcase(g[1])); s_2:= s_2 + g + ' '; i:= i + 1; g:=''; end; writeln(s_2);End.
1. Выбор участка.
2. Выбор проекта.
3. Получение необходимых разрешений.
4. Выбор материалов.
5. Решение вопросов финансирования строительства.
6. Собственно, проектирование
7. Подготовка участка к
строительству.
8. Поиск исполнителей.
9. Нулевой цикл.
10. Заготовка лесоматериалов.
11. Подготовка строительных материалов из леса и завоз на участок.
12. Сборка стен.
13. Установка кровли.
14. Подвод коммуникаций.
15. Внутренняя отделка.
Стример- ленточный накопитель, запоминающее устройство на принципе магнитной записи на ленточном носителе, с последовательным доступом к данным,
<span>long Factorial (int i)
{
if (i==0) return 1;
else return Factorial(i-1)*i;
}
int main()
{
float sum=0;
</span>for (int i=0;i<N;i++)
{
Sum=Sum+(Facotrial(i)/(2*i+1))
}
<span>S=sum;
cout<<s;
return 0;
<span>}
Примерно так. Только библиотеки не помню.
</span></span>