Напишите программу, которая вводит значения четырех переменных a, b, c, d типа integer и выводит их сумму. (паскаль)

Program suma; uses crt; var a,b,c,d,g: integer; begin writeln(a,b,c,d); readln(a,b,c,d); g: =a+b+c+d; writeln(`summ=`,g); end.

#include < cstdio> #include < iostream> using namespace std; int main () {       int n = 10;       int a[11];       srand(time(null));       for (int i = 0; i < n; i++)       {               a[i] = rand() % 100;       }       for (int i = 0; i < n; i++)               for (int j = 1; j < n; j++)               {                       if (a[j - 1] < a[j])                               swap(a[j - 1], a[j]);               }       for (int i = 0; i < n; i++)       {               cout < < a[i] < < " ";       } } srand( ) нужен для генерации каждый раз новой последовательности рандомных чисел

Обычно размер указывают, раз нету, взял по дефолту 10(const n=10). и диапазон какой-то странный, думаю имелось введу (-5; 5) program g; uses crt; const n=10; var i: integer; mass: array [1..n] of integer; begin     randomize;   clrscr;   writeln('исходный массив из 10 чисел диапозона (-5; 5): ');   for i: =1 to n do   begin     mass[i]: =random(11)-5;     write(mass[i]: 4);   end;   writeln;   writeln('исходный массив после замены всех отрицательны на -1: ');   for i: =1 to n do   if mass[i]< 0 then mass[i]: =-1;   for i: =1 to n do write(mass[i]: 4);   readln;   end.