Написать код к на делфи. : надано два числа a и y. если а> y то вычеслить х=а/100, если а

kavuzov01karamba73 kavuzov01karamba73    3   25.05.2019 03:30    0

Ответы
naval2018 naval2018  21.06.2020 03:12
Так понимаю, консольный 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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика