Var x, i:real;

Begin

Writeln ('vvedite vklad - ', X) ;

readln (X) ;

X:=X + (X*10/100) ;

X:=X + (X*15/100) ;

For i:=1 to 24 do

X:=X + (X*1/100) ;

writeln (X) ;

End.

Где я ошибся?

Правильный ответ на вопрос 👍 «Var x, i:real; Begin Writeln ('vvedite vklad - ', X) ; readln (X) ; X:=X + (X*10/100) ; X:=X + (X*15/100) ; For i:=1 to 24 do X:=X + ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!