Решение задачи Series 5

#include <bits/stdc++.h>
using namespace std;

int main() {
	srand((int)time(0));
	int N = rand() % 10 + 1;
	cout << "N = " << N << endl;
	
	double s = 0.0;
	float x;
	double fractpart, intpart;
	for(int i = 0; i < N; i++) {
		x = (rand() % 100) / 10.0;
		fractpart = modf(x, &intpart);
		s += intpart;
		cout << x << " : " << intpart;
		cout << " : " << s << endl;
	}
	
	cout << endl;
	cout << "Sum = " << s << endl;

	return 0;
}

import random

N = random.randrange(1,10)
print("N = ",N)
s = 0
for i in range(N):
    #x = random.randrange(1,6)
    x = random.uniform(0, 10)
    y = int(x)
    s += y
    print(y," : ",s," : ",x)
print()
print('Sum = ', s)
									

program Series5;
var
  R,Sum:Real;
  i,N:Integer;
begin
  Sum:=0;
  Write('Введите N: ');
  Readln(N);
  for i:=1 to N do
   begin
     Write('Введите ',i,' число: ');
     Readln(R);
     Writeln(int(R));
     Sum:=Sum+Trunc(R);
   end;
  Writeln(Sum);
end.