Ввести первоначальную сумму вклада, ввести ежегодный - вопрос №8758582 от Karbobo 25.12.2022 15:04

Question

Информатика: Ввести первоначальную сумму вклада, ввести ежегодный процент, сколько будет денег на счету через 10 лет работа на программе паскаль

Karbobo · Answer

Var  f, x: real; //f=ежегодный процент i :integer; //x=первоначальная сумма вклада
begin //Ввод writeln ('первоначальная сумма вклада'); readln (x);    writeln ('ежегодный процент'); readln (f);
//решениеfor i :=1 to n do begin x:=x + (x/100*f); end;
  //вывод writeln ('x = ', x);  end.