Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1 кбайт=1024 байта
1 байт=8 бит
81920/8=10240 байт
10240/1024=10 кбайт
в блок схемах не сильна
var n: integer;
s,s0: real;
begin
n: =1;
s: =10;
repeat
n: =n+1;
s: = s + (100+p)*s0/100;
s0: =(100+p)*s0/100;
until s> 200;
writeln(s);
end.
Популярные вопросы