помогите составить циклическую программу в паскале

Question

написать программу, которая вычисляет и выводит на экран двадцать площадей кругов с радиусом от 1 до 20 результат оформить в виде таблицы: R=1 S=3.14 
 ...
 R=20 S=1256

Ggggggg · Accepted Answer

Грубо: 
R0=0 
1.R=R0+1 
 S =....
 печать. cпереводом строки R =...,S=....
if R < 20 then goto 1 
("else" мона опустить) 
end. 
где-то так. 
 
P.S. 
операторы не помню - давно было. 
O! writeln(....)! 
Ессно, в начале писули надо описать переменные

Денис · Answer

for R=1 to 20 do 
 { 
 S=3.14*R*R 
 writeln (радиус - R, площадь - S) 
} 
end