Запишитесь алгоритм для решения задачи в словесно пошаговой форме: «Результаты переписи населения заносятся в ЭВМ. Определите средний возраст о человек

//Во-первых, строку нужно принимать через gerline, ибо через cin у вас в строку запишутся символы до первого пробела. Во -вторых, поиск слов из 3 символов выполнен неправильно, точнее он сработает в одном только случае, если вы введете строку из 3 символов, и то выведет 3 раза одно и то же слово.

//Вот как сделал я:

#include <iostream>

using namespace std;

int main()
{
string str;

int Size;
int ArrIndex = 0;

cout « "Enter string: ";
getline (cin, str);

string Element[str.length()];

for (int i = 0; i < str.length(); i++)
{
if (str[i] != ' ' && str[i] != '.')
Element[ArrIndex] += str[i];

else
ArrIndex++;
}

cout « endl;

for (int j = 0; j < str.length(); j++)
{
Size = 0;

for (int k = 0; k < Element[j].length(); k++)
Size++;

if (Size == 3)
cout « Element[j] « endl;
}

return 0;
}

const N = 30;

var a : array[1..N] of integer;

   i, j, x : integer;

   

Begin

 for i := 1 to N do readln(a[i]);

 readln(x);

 for i := 1 to N do begin  //перебираем элементы массива

   if a[i] = x then begin  //если находим элемент равный Х то

     writeln('наименьший номер элемента равного X - ', i); //выводим сообщение

     exit;  //и завершаем программу не завершив перебор, т.к. нам нужен только наименьший номер

   end;

 end;

 writeln('такого элемента нет'); //если перебрав весь массив не находим совпадений то выводим сообщение

end.

Объяснение:

объяснения в комментариях программы

проверено на PascalABC