Путем преобразования докажите равносильность следующих высказываний:

program zadacha6; var a,b: real; begin readln(a,b); if a> b then writeln (a) else writeln (b); end.

не? я не уверен

var a,res: integer;

begin

writeln('введите число');

readln(a);

res: =sqr(a);

writeln('квадрат числа,'a', равен,'res',');

readln;

end.

a-возраст cаши

b– возраст маши

program r;

var a,b: integer;

begin

readln(a,b);

if a=b then writeln («ровесники»)else writeln( «неровесники»)

end.

длину окружности

l=2*пи*r

r=√(х^2+х^2/2)

l=2*пи*√(х^2+х^2/2)

подставим х

при х=2.56789

l=19.7607=19.761

при х=345.678

l=2660.09556=2660.096