1) Разверни числа:
а) 81 б) 524 в) 341,6г) 89,11​

Язык: Pascal

Var
    a,b:integer;
Begin
    read(a,b);
    write(a+b);
End.

Язык C++

#include <iostream>
using namespace std;

int main() {
     int a,b;
     cin >> a;
     cin >> b;
     cout << a+b;
     return 0;
}

Язык JavaScript

var a = Number(prompt());
var b = Number(prompt());
alert(a+b); // или console.log(a+b);

ИЛИ
alert( Number(prompt()) + Number(prompt()) );

Язык Python

a = int(input())
b = int(input())
print(a+b)

ИЛИ
print( int(input()) + int(input()) )


Ввод для любой программы выше:
2
5

Вывод:
7

Задание 1-3

// PascalABC.NET 3.2, сборка 1325 от 19.10.2016
begin
  var a:=ArrRandom(10,-20,20); a.Println;
  Writeln('Сумма элементов ',a.Sum);
  Writeln('Произведение элементов ',a.Aggregate(1,(m,n)->m*n));
  Writeln('Сумма четных чисел ',a.Where(x->x.IsEven).Sum);
end.

Пример
13 18 9 -4 -13 5 -9 1 16 -5
Сумма элементов 31
Произведение элементов 394243200
Сумма четных чисел 30

Задание 4

// PascalABC.NET 3.2, сборка 1325 от 19.10.2016
begin
  var a:=ArrRandom(ReadInteger('N='),-20,20); a.Println;
  Writeln('Максимальный элемент A[',a.IndexMax+1,']=',a.Max);
  Writeln('Минимальный элемент A[',a.IndexMin+1,']=',a.Min);
end.

Пример
N= 13
12 7 13 8 -19 -19 -2 3 11 8 -3 -1 3
Максимальный элемент A[3]=13
Минимальный элемент A[5]=-19