program pr; vars,n: string; c: char; i: integer; beginwriteln('введите имя и фамилию в одной строке'); readln (s); i: =1; while s[i]< > ' ' do i: =i+1; n: =copy(s,1,i-1); writeln(n); readln; end.
Ответ дал: Гость
1)никакие люди не повторят подвиг матросова!
2)все великие,учёные люди подвергались критике и злобе,но это делало их сильнее.
3)не все люди могут победить в себе страх и сдержать боль перед смертью как это сделал извейстнейший казак разин
Популярные вопросы