Программа на скрине вместе с проверкой на тестовых примерах
Такой вариант правильный т.к учитывает ситуации когда все открытые скобки закрыты, но это сделано не в том порядке.
============
Не забывайте нажать " ", поставить оценку и, если ответ удовлетворил, то выберите его как "Лучший"
Бодрого настроения и добра!
Успехов в учебе
Задание 1
program HelloMoney;
var
y, i: integer; // Объявим переменные для количества лет вклада и для счетчика цикла
p, s: real; //Объявим переменные для количества процентов и величины вклада
begin
write('Какая сумма вклада? ');
readln(s); // Указываем сколько составляет вклад
write('На сколько лет вклад? ');
readln(y); // Указываем на сколько лет вклад
write('Какая процентная ставка?');
readln(p); // Указываем процентную ставку
for i:=1 to y do
s := s + s*p/100; // Прибавляем к вкладу ежегодный процент
write('Сумма денег составит: ', s);
end.
Объяснение:
Если скобка открывающая - увеличиваем соответствующий элемент в списке symbols, если закрывающая - уменьшаем. В конце при правильной строке в этом списке должны остаться только нули.