Составьте программу на языке паскаль которая уменьшает первое число в 5 раз если оно больше второго по абсолютной величине.

Pascal: uses crt; var a, b:real; begin writeln ('Введите 2 числа'); read (a, b); if abs (a) >abs (b) then begin writeln ('Первое число больше второго по модулю'); write ('a=', a/5:0:2); end else writeln ('Первое число не больше второго по модулю'); end.