Пт, 23.06.2017, 20:24
Форум інформатиків України
Головна Реєстрація Вхід
Вітаю Вас, Гість · RSS
Вітання на форумі
Незнайомець
Вітаємо на форумі,
Незнайомцю!

   
зареєструйтесь
Перед реєстрацією обов’язково прочитайте:
Оновлення Учасники Пошук
Особисті повідомлення
Видавництво ’’Аспект’’ Видавництво
Безлимитный хостинг, бесплатный домен, бесплатный хостинг, Хостинг, dedicated, сервер, хостинг в Европе, хостинг в Германии, выделенный сервер

Сторінка 1 з 11
Модератор форуму: Ktara, Bandalak, НІКОЛЯ, volevikt 
Форум інформатиків » РОЗДІЛ ІІІ: МЕТОДИКА, ЗАСОБИ ВИКЛАДАННЯ ІНФОРМАТИКИ » 3.6 Методика викладання інформатики згідно програми » Паскаль (Рядкові велечини)
Паскаль
ihor_kulikovskyi Дата: Пт, 13.12.2013, 02:26 | Повідомлення № 1
Новий користувач
Повідомлень: 1
Нагороди: 0
Рейтинг: 0
програма для одного пропуску працює прекрасно а от для декілька між словами ні поможіть!!!!

Program string3;
var a,word:string; n,i,m,r,h,k:integer;
begin
writeln('Vvedit slova');
readln(a);
r:=length(a);
for i:=1 to r do
if  a=' ' then m:=i;
h:=r-1-m;
word:=copy(a,m+1,h);
n:=length(word);
for i:=1 to length(a)-n-1 do
if copy(a,i,n)=word then delete(a,i,n);
k:=1;
for i:=1 to length(a) do
begin
if a
=' ' then
begin
delete(a,1,1);
delete(a,i,1);
end;
end;
writeln('Tci slova',a);
readln;
readln;
readln;
end.
Пилипчук_О_П Дата: Пт, 13.12.2013, 03:24 | Повідомлення № 2
Ветеран спілкування
Повідомлень: 3573
Нагороди: 27
Рейтинг: 272
Є ризик, що на момент першого використання у рядку h:=r-1-m; зміна m буде не визначеною. Це між іншим.

А в цілому: програма погано "читається". Раджу написати коментар, що на якому етапі робиться. Тоді й стане видно, де помилка.
TYP Дата: Пт, 13.12.2013, 12:39 | Повідомлення № 3
Прописаний назавжди
Повідомлень: 329
Нагороди: 4
Рейтинг: 28
Довго мучила проблема незручності використання стандартного IDE Free Pascal. Альтернативні рішення не могли його замінити  по причині відсутності, чи незручності покрокового відлагодження програм. І ось нарешті вдалося помирити Free Pascal із Geany + Scope Debugger
Вдалося прикрутити до Portable версії компілятор FPC 2.6.2 і дебагер GDB 7.3. Geany основні комбінації клавіш налаштовував схожими до FPC. Хоча не все вдалося.  Кому цікаво завантажити можна ТУТ
Форум інформатиків » РОЗДІЛ ІІІ: МЕТОДИКА, ЗАСОБИ ВИКЛАДАННЯ ІНФОРМАТИКИ » 3.6 Методика викладання інформатики згідно програми » Паскаль (Рядкові велечини)
Сторінка 1 з 11
Пошук:


© Форум інформатиків України, 2007-2017.