Необходимо составить программу на языке Pascal.
Задание: найти сумму чисел.
Формула, по которой составлять:
S = x+x/4-x/9+x/16+x/25...+x/100

В объяснении

Объяснение:

program summa;

var sum:real;

   k, x:integer;

begin

 writeln('ВВедите x');

  readln(x);

sum:=0;

k:=2;

while k<=10 do

   begin

       sum:=sum+x/(k*k);

       k:=k+1;

   end;

writeln('Сумма=', sum:2:3);

readln;

end.

может кто перепишет на паскаль

вот на c:

#include < stdio.h> int main(void){  int km, day;   day = 1;   km = 10;   while (km < = 200)  {  if (km == 20)  {    printf("20km in %d day\n", day);     }     km += km / 10;   day++;   }  printf("< 200km in %d day", day);   printf("\n");   system("pause");   return 0; }

мне кажется в цифровом виде