Написать программу к задачам 1) Даны два числа х и у. Найти их среднее арифметическое и среднее геометрическое. 2) Дана сторона равностороннего треугольника а. Найти его площадь S, радиус вписанной и описанной окружностей.
Оочень

язык программирования: паскальvara, b, c, min : integer; beginreadln (a); readln (b);   readln (c);   min : = a; if b < min thenmin : = b; if c < min thenmin : = c; writeln (min); end.

  v=331+0,6*(-35)=310 м/c

v=331+0,6*30=349 м/c

ну можно, если на паскале, в одной прописать асижн (вызов файла), реврайт, записать туда переменные. а в другой программе прописать чтение переменной из файла, если ты об а так например импорт-экспорт есть во многих прогах (оффис вот

program summa;

var s, a, b, c : word;

begin

            write('введите a - > '); readln(a);

            write('введите b - > '); readln(b);

            write('введите с - > '); readln(c);

            s: =a+b+c;

            write(' сумма равна ',s);

            readln

end.