В строке все символы ‘7’ и ‘!’ заменить на символы ‘?’

@DjDeniels-61 · Регистрация: 18.06.2009

Author24 — интернет-сервис помощи студентам

1.Дана символьная строка S. Скопировать первые N сиволов из исходной строки в новую. N вводиться с клавиатуры. Если N больше длины строки, то строка копируется целиком.
2.Дана символьная строка S. В этой строке все символы ‘7’ и ‘!’ заменить на символы ‘?’.

3.Написать программу, которая после ввода с клавиатуры фамилии, имени, отчества определяет пол.

Плиз помогите,буду очень благодарен!
Заранее огромное спасибо!

@Mephistopheles · 15.12.2009, 18:09

1 zadacha:

Pascal

var i,j,n:integer;s,c:string;
begin
readln(n);
readln(s);
if n>length(s) then c:=s;
if n<length(s) then begin
for i:=1 to n do
c[i]:=s[i]end;
end.

Добавлено через 2 минуты
2 задача:

Pascal

var i:integer;s:string;
begin
readln(s);
for i:=1 to length(s) do begin
if (s[i]='7') or (s[i]='!')
then s[i]:='?';end;
end.

Добавлено через 2 минуты
3 задача:

Pascal

var i:integer;s:string;
begin
readln(s);
if s[length(s)]='a' then write('j')
else write('m');readln
end.

@DjDeniels-61 0 / 0 / 0 Регистрация: 18.06.2009 Сообщений: 35
		1
	В строке все символы ‘7’ и ‘!’ заменить на символы ‘?’ 15.12.2009, 17:33. Показов 1319. Ответов 1 Метки нет (Все метки) 1.Дана символьная строка S. Скопировать первые N сиволов из исходной строки в новую. N вводиться с клавиатуры. Если N больше длины строки, то строка копируется целиком. 2.Дана символьная строка S. В этой строке все символы ‘7’ и ‘!’ заменить на символы ‘?’. 3.Написать программу, которая после ввода с клавиатуры фамилии, имени, отчества определяет пол. Плиз помогите,буду очень благодарен! Заранее огромное спасибо! 0

	15.12.2009, 18:09

В строке все символы ‘7’ и ‘!’ заменить на символы ‘?’

Решение