Здравствуйте, помогите написать код к задаче на делфи. Задача: Надано два числа A и Y. Если А>Y то вычеслить х=А/100, если А

Question

Информатика

Остромир

28 февраля, 13:09

Здравствуйте, помогите написать код к задаче на делфи. Задача: Надано два числа A и Y. Если А>Y то вычеслить х=А/100, если А

+4

Ответы (1)

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

Магдалина · Answer 1

Так понимаю, консольный Delphi - это Pascal?)

var x, y, a, k: real;

begin

readln (a, y) ;

if (a > y) then

begin

x : = a / 100;

writeln (x) ;

end;

if (a < y) then

begin

k : = 100 * abs (a) ;

writeln (k) ;

end;

end.