Вычислить и напечатать сумму площадей кругов с радиусом от 18 до 99. 
Пожалуйста, напишите способом цикл ПОКА или цикл ДЛЯ.

S = Pi * R^2На Pascal:program Project;var  sum: Integer;  i: Integer;begin  sum:=0;  for i:=18 to 99 do    sum:=sum + (3.14 * i * i)  WriteLn("sum s = ", sum);end.На C:#include "stdio.h"main(){  int sum = 0, i;    for(i = 18; i <= 99; i++)    sum = sum + (3.14 * i * i);    printf("Sum(S) = %i", sum);}