КОД НА С++. Неверный ответ удалю!! Как можно быстрее
Диофантово уравнение
Даны натуральные числа a, b, c. Если уравнение ax+by=c имеет решения в целых числах, то выберите то решение, в котором число x имеет наименьшее неотрицательное значение, и выведите это решение (два числа x и y через один пробел). Если решения не существует, то выведите −1.
Входные данные
Входные данные — натуральные числа a, b и c. Числа заданы на одной строке через пробел и не превышают 109.
Выходные данные
Выведите ответ на задачу.
Примеры
Ввод 1
1 2 3
Вывод
1 1
Ввод 2
2 2 2
Вывод
0 1
var
i, c, sum: shortint;
sr: real;
m: array[1..20] of shortint;
begin
sum := 0;
readln(c);
for i := 1 to c do
begin
readln(m[i]);
sum := sum + m[i];
end;
sr := sum / c;
sr := round(sr * 100) / 100; //если округлять не нужно, удали эту строчку
writeln('Среднее арифметическое: ', sr);
end.
Вторая задача:
var
i, c: shortint;
p: integer;
m: array[1..20] of shortint;
begin
p := 1;
readln(c);
for i := 1 to c do readln(m[i]);
for i := 1 to c do p := abs(p * (m[i]));
writeln('Произведение всех модулей массива: ', p)
end.