помогите решить задачу в паскале С ПОМОЩЬЮ ОПЕРАТОРА while

Question

помогите решить задачи в паскале С ПОМОЩЬЮ ОПЕРАТОРА while. 
 
Напечатать таблицу соответствия между весом в фунтах и весом в кг для значений от 1 до 10 фунтов с шагом 0.5 фунта. формула перевода 1 фунт = 400 г. Составьте блок-схему и программу решения задачи.

Виктория Осипова · Accepted Answer

var q : array [1..11] of real; 
var q1 : array [1..11] of real; 
var j:array [1..4] integer; 
C:= 2.5: 
 
WHILE j<22 DO 
begin 
q1:= q*C 
end; 
вроде так :)