ТутРешу.Ру

Здравствуйте, помогите написать код к задаче на делфи

Задание:

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

Решение:

Так понимаю, консольный 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.




Знаете другой ответ?

Отправить свой ответ