===== PascalABC.NET =====
begin
var (n, m) := ReadInteger2('Введите n и m:');
var a := MatrRandom(n, m, -99, 99);
a.Println(6);
a.Transform(p -> p * p);
Writeln;
a.Println(6)
end.
Входные данные одни на все
#include <iostream>
#include <cmath>
using namespace std;
int main() {
float x, y;
cin >> x >> y;
cout << "a) " << (abs(x) - abs(y)) / (1 + abs(x*y)) << endl;
cout << "b) " << sqrt(pow(x, 2) + pow(y, 2)) / (x*y) << endl;
cout << "c)" << (x - y) / (abs(x) - abs(y)) << endl;
cout << "d)" << sqrt(abs(x) + abs(y)) / sqrt(pow(x, 2) + 1) << endl;
return 0;
}
mas_list = [i for i in range(300,900+1)]
print("Средне {}".format((sum(mas_list)/len(mas_list))))
Сообщение составит 32 * 2500 = 80000 бит = 10000 байт
Var a, b: real;
begin
read(a, b);
write((a + b) / 2 : 0 : 2)
end.