Задача паскаль Дана символьная строка, посчитать количество букв о. Заменить все...

March 2022 1 16 Report

Задача паскаль Дана символьная строка, посчитать количество букв о. Заменить все буквы о на а. Моя программа буквы о считает, а вот на а их не меняет, как это сделать?

Answers & Comments

petyaGavrikov

Verified answer

var s:string; i,k:integer;
begin
writeln('Введите строку:');
readln(s);
k:=0;
for i:=1 to length(s) do
if s[i]='o' then begin k:=k+1; s[i]:='a'; end;
writeln('k = ',k);
writeln(s);
end.

Пример:program, procedure, var, array
k = 2
pragram, pracedure, var, array

2 votes Thanks 1

Answers & Comments

Verified answer

vneshnie effekty sfery obrazovaniya

zaprashivayu pomosh na naklonnoj ploskosti s uglom naklona 45 nahoditsya doska

tex]...

pozhalujsta ya ne ponimayu kak mozhno ponyatnej

pomogite reshit primery vnutri 66 ballov

vsyo v skrine pomogite pzhl

postroit traektoriyu sluchajnyh bluzhdanij po kvadratnoj reshetke paskal

moleea5e0514c51d23b5872ad443a75de83 66440

gotovlyus k ege fizika bez repika pomogite pozhalujsta vot iz c chasti zadachkayo

pomogite s pskalem odin iz grafikov na vybor do vechera proshu zaranee spasibo

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

Helpful Links

Helpful Social