n]=strtok (NULL," "); + +;
} (m == 0) cout << «Zadanogo slova nemae y rechenni!»; (); 0;
}
Результат:
Блок схема:
Завдання 14. Багатовімірні МАСИВ та МАСИВ символьних рядків
Ввести послідовність символьних рядків, у кожному з якіх записано Прізвище, ім я та по-батькові одного студента. Візначіті и запам ятати стати шкірного. Потім скоротіті рядки, залиша Тільки Прізвище та ініціалі. Надрукувати СКОРОЧЕННЯ список, вказано в дужках стати шкірного студента.
Код програми:
# include
# include
# include FFF (char M []); ()
{A [100], B [100], C [100]; << «Vvedu PIB persogo stydenta:»; (A); << «Vvedu PIB drygogo stydenta: »; (B); <<« Vvedu PIB tretiogo stydenta: »; (C); <<« Skorochenuj spusok stydentiv: n" ; (A); (B); (C); (); 0;
} FFF (char M [])
{i, k, n=0, n1, n2; im [20], * st;=strlen (M); (i=0; i
{+ +; (n == 1) n1=i +1; (n == 2) n2=i;
} (i=n1; i
{<< M [i]; (i == n1) cout << «. »;
} << M [n2 +1] << «. »<<« (»<< St <<«) n" ;
}
Результат:
Блок схема:
Завдання 15. Файли
Сформувати файл А, что містіть інформацію про кінострічкі:
назва фільму;
рік випуску;
кіностудія;
режисер.
З файлу А вібрато и переписати у файл В інформацію про кінострічкі, зняті кіностудією ім. Довженка у 1985 - 92 рр.
Код програми:
# include
# include
# include kino
{name [50], studia [50], rejiser [50]; rik;
}; ()
{i; A [3]; fileo («A. txt»); (int i=0; i <3; i + +)
{<< «Nazva filmu:»; >> A [i]. name; << «Rik:»; >> A [i]. rik; << «Studia:»; >> A [i]. studia; << «Rejiser:»; >> A [i]. rejiser; << A [i]. name << « T»
<< A [i]. rik << « T»
<< A [i]. studia << « T»
<< A [i]. rejiser << « N»;
} filei («A. txt»); fielTwo («B. txt»); (int i=0; i <3; i + +)
{(A [i]. rik> 1985 && A [i]. rik <1992 && (! strcmp (A [i]. studia, «Dovzhenka»)))
{<< A [i]. name << « T»
<< A [i]. rik << « T»
<< A [i]. studia << « T»
<< A [i]. rejiser << « N»;
}
} (); 0;
}
Результа...
