Достоинства растровой графики:

1. Возможность воспроизведения изображений любого уровня сложности. Количество деталей, воспроизводимых на изображении во многом зависит от количества пикселей.

2. Масштабирование (в частности, увеличения) изображения без потери качества.

3. Большой размер файла.​

Решение больше математическое получилось с выводом формулы, там уж сами выберете как вам лучше.
На каждый следующий день спортсмен пробегает в

большее расстояние чем в предыдущий.
Т.е. если обобщить:

Расстояние, которое спортсмен пробегает каждый n-ный день.
В итоге, у нас получилась геометрическая прогрессия, где


Чтобы найти сумму первых n членов геометрической прогрессии:

В программе пишем:
_________________________
var
i:integer;
k:double;
begin
k:=1.1;
for i:=1 to 6 do k:=k*1.1;
writeln(100*(k-1):0:2);
end.
__________________________

№1
r = 187,5
a = 9
d = 63

№2
var a,b,c,d,e,f:real;
begin
writeln ('Введите оценки полученные в 5 опросах: ');
readln (a,b,c,d,e);
f:=(a+b+c+d+e)/5;
writeln ('Средняя оценка = ',f);
end.

№3
var dengi,a,b,c,d,ostatok:real;
begin
writeln ('Сколько у Вас денег?');
readln (dengi);
writeln ('Введите стоимость перчаток:');
readln (a);
writeln ('Введите стоимость портфеля:');
readln (b);
writeln ('Введите стоимость галстука:');
readln (d);
ostatok:=dengi-a-b-d;
if ostatok <0 then
writeln ('Вам не хватит денег на данную покупку, для совершения этой покупки Вам нужно ещё ', abs(ostatok), ' рублей')
else
writeln ('У Вас останется ',ostatok,' рублей');
end.