Turbo Pascal

[Hamster]

Ты разницу между текстовиком и типизированным файлом видишь?

 

[Nota]

Паца я вообще токо на СИ писать могу а поскаль ещо и в глозо не видел! Ну как , поскаль лучше чем СИ.?

 

[TesteR]

Не мешало бы выучить ещё и русский язык.

 

[KoLoB]

Паца я вообще токо на СИ писать могу а поскаль ещо и в глозо не видел! Ну как , поскаль лучше чем СИ.?

Каждый язык используеться для своих целей.
Паскаль очень зорош для изучения азов программирования и алгоритмизации.

З.Ы. Виндовз написан на с

 

[pentium]

pentium там у тя 2 ошибки.
Код твой малость подправил, там у тя 2 ошибки было.
Компилится нормально. Потестируй сам, если что пиши помогу если смогу

Lovesan огромное тебе спасибо!)

 

[lovesan]

2.Дано зашифроване речення на російській мові*** і кодовий зсув k (0<k<10). Розшифрувати речення.

program shufrovanie;
uses
crt;
var
s,s1:string;
i,k:integer;
begin
write('Введите зашифрованое предложение: ');
readln(s);
for k:=1 to 9 do
for i:=1 to length(s) do
begin
s1:='';
insert(chr((org(s)+k),s1,i);
writeln('При k=',k,' Расшифрованная строка: ',s1);
end;
repeat until keypressed;
end.

 

[hp`]

Помогите решить задачу в Turbo Pаscal 7.0

Помогите мне плизз! Немогу решить задачу на курсовую работу(( Буду очень благодарен!
Условие:
Дано деякий текст. Відредагувати його таким чином, щоб після кожного розділового знака стояв хоча б один пробіл, а всі перші слова в реченнях починалися з великої літери.
Контакты:
мирк (port:7777-hp`)- /query hp`
мирк (port:6669-energy)- /query energy
Icq: Energy (425-453-725)
Или же здесь.

 

[lovesan]

Re: Помогите решить задачу в Turbo Pаscal 7.0

и че за такое мну будет если решу?
P.S. если че пиши в асю 357630044

 

[hp.]

Re: Помогите решить задачу в Turbo Pаscal 7.0

пивоо буит!
если решиш!))

 

[lovesan]

Re: Помогите решить задачу в Turbo Pаscal 7.0

та не вопрос, уже половина готова