N*40 минут (на все уроки) + N*10 минут (перемены)+45 минут (танцы)
<h3>PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var n := ReadlnInteger('N=');
var R := new integer[n];
repeat
var a := ReadlnString.ToCharArray;
if a.Length <> N then break;
if a.Where(c -> c = '+').Count = 1 then
Inc(R[a.IndexOf('+')])
until False;
R.Transform(t -> t >= 0.07 * N ? 1 : 0);
R.Numerate.Where(t -> t[1] = 1).Select(t -> t[0]).Println
end.
<h3>Пример</h3>
(окончание ввода - строка длины отличной от N)
N= 5
-+---
--+--
-+---
+----
-+---
--+--
-+---
+----
----+
-+---
1 2 3 5
//Microsoft (R) C/C++ Optimizing Compiler Version 19.00.23506 for x64
#include <iostream>
#include <string>
#include <sstream>
using namespace std;
int main()
{
string str = "Hello wordl";
string to_replace, word, result;
stringstream ss( str );
cin >> to_replace;
while (ss >> word)
{
if (word.find(to_replace) != string::npos)
{
word = "...";
}
result += word + " ";
}
cout << result << endl;
}
Больших жёлтых яблок было 7 штук.
1.32+17=42. Всего плодов
2.42-32=10.маленк. желт. яблок.
3.42-28=14.- большие зел.плоды
4.<span>Яблок на 2 больше, чем груш — 8 яблок, 6 груш.
5. 25 яблок, из них больш. зел. 8, маленк. жёлт. 10.
6.</span><span> 25-8-10=7.</span>