какой код??? код вычесления квадратного корня? Скелет? или калькулятор? больше информации
Еелплдадвжкждккдадажжадададпжпдададаадпдеддаажажажажад
<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var (s1, s2) := ReadReal2('Введите площади кругов:');
Println('Площадь прямоугольника равна ', 2 * Max(s1, s2) / Pi)
end.
<h3>Введите площади кругов: 46.13 41.52</h3><h3>Площадь прямоугольника равна 29.3672700993165 </h3>
var a,b,c,d;integer;
begin
readln(a,b);
c:=a+b;
d:=a*b;
writeln('сумма',c);
writeln('произведение',d);
end.
это для паскаля