В строке символов ,слова разделить пробелом ,если в ней встречается слово "воронеж" то заменить маленькую в на
10-11 класс
|
большую В
var s:string; i:integer;
begin
read(s);
for i:=1 to length(s);
if s[i]='в' and s[i+1]='о' and s[i+2]='р' and s[i+3]='о' and s[i+4]='н' and s[i+5]='е' and s[i+6]='ж' then s[i]:='В';
writeln(s);
end.
Другие вопросы из категории
человеком слов за 1 год.
Читайте также
и удовлетворяют след. свойству:
- слово совпадает с начальным отрезком латинского алфавита ('a','ab','abc' и т.д.)
P.s. Только решить её надо не использую строки.Вместо них array of char...
Пример ввода:
writeln('Введите предложение, символ конца - точка');
i := 0;
repeat
inc(i);
read(a[i])
until (a[i] = '.')or(i = n);
Заранее огромное спасибо.
полученную строки.Напишите,пожалуйста,программу
полученную строки.Напишите,пожалуйста,программу.Составить программу в паскале.
случае надо следить за текущей позицией в строке и при вводе очередного "слова" контролировать, чтобы его длина плюс текущая позиция не превысили длины строки. в QBasic
2.Дана строка символов, среди которых есть одна открывающаяся и одна закрывающаяся скобка. Подсчитать, сколько слов расположено внутри этих скобок.
3.Дана строка. Удалить из нее все запятые и подсчитать, сколько получилось удаленных символов.
Помогите, пожалуйста!