ответ: решение ниже
Объяснение:
program ky;
var
a, b, c: integer;
begin
A := 3;
b := 5;
c := 2;
Writeln('ответ ', sqr(b) - 4 * a * c,';');
end.
ответ: решение ниже
Объяснение:
program ky;
var
a, b, c: integer;
begin
A := 3;
b := 5;
c := 2;
Writeln('ответ ', sqr(b) - 4 * a * c,';');
end.