Haesiy
02.11.2020 20:07

Какие объекты связывает отношение «входит» в состав?

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
katyakantalins
06.02.2020 21:54
#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;
}
0,0(0 оценок)
Ответ:
Taksa64
09.03.2020 05:24
// PascalABC.NET 3.2, сборка 1483 от 14.06.2017
// Внимание! Если программа не работает, обновите версию!

function ReadComplex:Complex;
begin
  var (r,i):=ReadReal2;
  Result:=cplx(r,i)
end;

procedure WriteComplex(x:Complex);
begin
  if x.Imaginary=0 then Write(x.Real)
  else begin
    if x.Real<>0 then Write(x.Real);
    if (x.Imaginary>0) and (x.Real<>0) then Write('+');
    Write(x.Imaginary,'i')
    end
end;

begin
  var n:=ReadInteger('N =');
  Writeln('Введите ',n,' комплексных чисел');
  Writeln('Формат ввода числа: действ.часть, пробел, мнимая часть');
  var s:=cplx(0.0,0.0);
  loop n do s+=ReadComplex;
  Write('S='); WriteComplex(s)
end.

Пример
N = 5
Введите 5 комплексных чисел
Формат ввода числа: действ.часть, пробел, мнимая часть
2.3 -3.12
-1.7 8
6.14 0.2
-2.4 -3.2
0 1.6
S=4.34+3.48i
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота