дана строка. написать программу,заменяющую в строке все буквы "s" на буквы "с" п...

veta15 @veta15

July 2022 2 0 Report

дана строка. написать программу,заменяющую в строке все буквы "s" на буквы "с"
помогите пожалуйста!!!в паскале)

nikatmh Выделить строку и нажать шифт+цтрл-это в левом нижнем углу клавиатуры

0 votes Thanks 0

veta15 это не то:(

Endok Var T:string;
k:integer;
s,c:char;
begin
Writeln('Введите строку');
Readln(T);
Writeln('Введите буквы s и c');
Readln(c);
While not(Pos(s,T)=0) do
begin
k:=Pos(s,T);
T[k]:=c;
end;
Writeln('Изменённая строка - ',T);
end.

2 votes Thanks 1

veta15 спасибо!!!!!))))вы мне сегодня очень сильно помогли!))

Answers & Comments

dana stroka opredelit est li v dannoj stroke bukva sh rasskayamalenkaya bu

dana stroka napisat programmukotoraya podschityvaet kolichestvo simvolov p

dana stroka soderzhashee slovozapisannoe cherez defis napisat programmu kotora

napisat programmu dlya vyvoda na ekran bolshih russkih bukv v alfavitnom poryadke

dana stroka napisat programmu dlya vyvoda na ekran pervoj bukvy stroki srochno

dany dve strokinapisat programmu dlya vyvoda na ekran slova poluchennogo iz summ

kakovy massy kazhdogo iz gruzovesli odin iz nih tyazhelee drugogo na 20 n momogit

soglasny li vy so sleduyushim mneniem sostoyanie rabstva bylo privychno dlya afrik

рекомендуемые вопросы

Helpful Links

Helpful Social