Определите результат работы программы: Writeln ( 'Сумма =', 7 + 7) ;?
​

на С++ как то так

#include<iostream>
#include<ctime>

using namespace std;

int main(){
srand(time(NULL));
int N, a, sum = 0, ten = 10, index = 0;
int *arr;
cout << "enter size of arr(enter N) : ";
cin >> N;
arr = new int [N];

for(int i = 1; i <= N;i++)
arr[i] = rand()%25;

cout << "arr : " << endl;
for(int i = 1; i <= N;i++)
cout << arr[i] << " " ;
cout << endl;

cout << "enter a : " ;
cin >> a;

for(int i = 1; i <= N;i++)
{
if(arr[i] == a)
index = i;

}
if(index != 0)
{
for(int i = index + 1; i <= N;i++)
sum = sum + arr[i];
}
if(sum == 0)
cout << "Result = " << ten << endl;
else
cout << "Result = " << sum << endl;
}

uses crt; {вывод результата в отдельном окне}
var i,j,n,m,max,min:integer;  {ввод переменных}
a:array[1..10,1..10] of integer;  {ввод массива} 
begin
clrscr;  {очистка экрана вывода} 
writeln ('vvedite chislo n');  {выводим на экран сообщение}
read(n);  {вводим число} 
writeln ('vvedite chislo m');  {выводим на экран сообщение} 
read(m);  {вводим число} 
writeln ('vvedite elementu massiva');  {выводим на экран сообщение} 
for i:=1 to n do
for j:=1 to m do
begin  {откроем операторные скобки, чтобы каждый раз не задавать границы массива} 
readln(a[i,j]);  {вводим массив} 
max:=a[1,1];  {задаем значения для минимума и максимума для сравнения с другими элементами} 
min:=a[1,1];
if a[i,j] > max then
max:= a[i,j];
if a[i,j] < min then
min:=a[i,j];
end;  {закроем операторные скобки} 
writeln('max=',max,'min=',min);  {вывод на экран сообщения} 
end.