yatania-popovich7
?>

Выбери верный ответ. https://ykl-res.azureedge.net/c535a589-2c59-4939-8b84-7bff7f2cd6db/1.png Find what: город Replace with: место слово «место» заменится на слово «город» слово «город» заменится на слово «место» слово «место» заменится на слово «финиш» слово «город» заменится на слово «финиш»

Информатика

Ответы

a580028r
Верный вариант ответа под номером 2
margo55577869
#include <iostream>
#include <cstring>

int main() {

char* text1 = "Слово";
char* text = "Как то текст с гласными на конце кок";

char* newText = new char[strlen(text)];

int lastStop = 0, lastIter = 0;
for (int i = 0; text[i] != '\0'; i++) {
bool copyIt = false;

if (text[i] == ' ') lastStop = i;


if (text[i + 1] == ' ' || text[i + 1] == '\0') {
for (int j = 0; text1[j] != '\0'; j++) {
if (text[i] == text1[j]) {
copyIt = false; break;
}
copyIt = true;
}

}

if (copyIt == true) {
for (int j = lastStop; j <= i; j++, lastIter++)
newText[lastIter] = text[j];
}
}

for (int i = 0; i < lastIter; i++)
std::cout << newText[i];

std::cout << "\n";

return 0;
}
dimiff5
Var
   O:string;
   i,k:byte;
   B,pO:array[1..3] of string;
Begin
B[1]:='2 * 2 = 5 ?';pO[1]:='нет';
B[2]:='Оператор Read вводит данные?';pO[2]:='да';
B[3]:='СССР победил в войне 1812 года?';pO[3]:='нет';
k:=0;
For i:= 1 to 3 do
    Begin
    WriteLn(B[i]);
    ReadLn(O);
    O:=LowerCase(O);
    While (O <> 'да')and(O <> 'нет') do
       Begin
       Write('Попробуйте ещё раз: ');ReadLn(O);
       O:=LowerCase(O);
       End;
    if pO[i] = O then k:=k+1;
    End;
WriteLn('Количество правильных ответов: ',k);
End.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Выбери верный ответ. https://ykl-res.azureedge.net/c535a589-2c59-4939-8b84-7bff7f2cd6db/1.png Find what: город Replace with: место слово «место» заменится на слово «город» слово «город» заменится на слово «место» слово «место» заменится на слово «финиш» слово «город» заменится на слово «финиш»
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

mrubleva42
milkiev
Виктор-Богданов
nalich8524
yulyazhdan
Aleksandrovna370
Galiaahmatova4447
cheberyako2013
Seid-ZadeNadezhda1769
Itina321t
mgrunova
itartdesignprof
ВостриковаСтародубцева1980
akremlev2015
Vlad Petr531