Треба до по задічі з інформатикі яку потрібно написати на мові Pascal. Ось задача: Визначити яку платню одержить фірмі сумісник за виконану роботу якщо йому нараховано s грн а податок становить 10 відсотків.

Для разделения целой и дробной частей десятичной дроби использовать запятую.

Вводить отрицательные числа со знаком минус или взять число в скобки.

Для обозначения процентов после числа вводить символ "%".

Обычную дробь нужно вводить, указывая и отделяя её от дробной пробелом.

Обозначение единиц измерения после чисел не вводится, только если это не денежные единицы.

перевод:

Для поділу цілої та дробової частин десяткового дробу використовувати кому.

Вводити негативні числа зі знаком мінус або взяти число в дужки.

Для позначення відсотків після числа вводити символ "%".

Звичайну дріб потрібно вводити, вказуючи і відокремлюючи її від дробу прогалиною.

Позначення одиниць виміру після чисел не вводиться, тільки якщо це не грошові одиниці.

#include <bits/stdc++.h>

using namespace std;

int search1(string str) {

 for (int i = 0; i < str.size(); i++) {

   if (str[i] == 'f') return i;

 }

 return -1;

}

int search2(string str) {

 for (int i = str.size() - 1; i >= 0; i--) {

   if (str[i] == 'f') return i;

 }

 return -1;

}

int main() {

 string str = {};

 getline(cin, str);

 int a = search1(str);

 int b = search2(str);

 if (a != -1) {

   if (a == b)

     cout << a;

   else

     cout << a << " " << b;

 }

 return 0;

}