Задание
Какие значения будут у переменных а, b, c после выполнения программы, если начальные значения переменных следующие: а=5; b=4; c=3. В ответе запишите числа без пробелов и других разделительных знаков в том порядке, в котором они будут выведены.
Var
a, b, c : integer;
Begin
writeln \('Введите числа a, b, c'\);
readln\(a,b,c\);
if \(a\\lt =b\) and \(b\\lt =c\) then
begin
a:=sqr\(a\);
b:=sqr\(b\);
c:=sqr\(c\);
end
else if \(a\\gt b\) and \(b\\gt c\) then begin b:=a;
c :=a;
end else
begin a:=-a;
b:= -b;
c:=-c;
end;
writeln\('a=',a,' b=',b,' c=',c\);
End.