<span>var s1,s2:real; i:integer;
begin
s1:=2500000;
s2:=2000000;
for i:=1 to 7 do
begin
s1:=s1+s1*5.5/100;
s2:=s2+s2*6/100;
end;
writeln('s1 = ',s1:0:2,' s2 = ',s2:0:2);
if s1>s2
then writeln('В первом банке денег будет больше на ',s1-s2:0:2)
else writeln('Во втором банке денег будет больше на ',s2-s1:0:2);
end<span>.
Результат:
</span><span>s1 = 3636697.90 s2 = 3007260.52
В первом банке денег будет больше на 629437.38</span></span>
Ответ:
Формулы на картинках.
Объяснение:
Проценты сначала убиваешь разделив на 100 (0,74 и т.д.)
Потом выделяешь диапазон В1:В9 и ставишь формат чисел процентный. Потом регулируешь, чтобы отображались только целые значения.
Любого графического редактора? Ластик , заливка , пипетка( она же выбрать уже существующий на экране цвет) , лупа , карандаш , кисточка , распылитель ,палитра.
Function prime(n:longint):boolean;
var i,j:longint;
p:boolean;
Begin
p:=true;
if (n mod 2)=0 then p=false;
i:=3;j:=round(sqrt(n));
while (i<=j)and(p) do
Begin
if(n mod i)=0 then p=false;
inc(i,2);
end;
prime:=p;
end;
Искусственные,естественные