Написать код к на делфи. : надано два числа a и - вопрос №1889385 от Kamjla1 22.05.2020 04:25

Question

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

Kamjla1 · Answer

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

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