Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.
Новые вопросы по предмету Информатика:
Program gt;
var a,b,p:real;
i:integer;
begin
a:=10000;
p:=7.4;
for i:=1 to 8 do
begin
a:=a+a*p/100;
end;
writeln(a);
end.