Что выведится в фрагменьте задании
s:0;a:=1;
while a<2do begin
s:=s+a;a:=a+0.5;
writeln(a:5:2,s:5:2)end;

Если ты переписал фрагмент правильно, то: 1.50 1.00 2.00 2.50Если end расположен перед writeln, то тогда ответ  2.00 2.50