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

Question

Эладя

12 января, 10:20

+2

Ответы (1)

Знаете ответ на вопрос?

Артем · Answer 1

program cnjdknc;

uses crt;

var a, b:real;

begin

readln (a, b) ;

if a>b then a:=a/5;

writeln (a) ;

readln;

end.