Определить, являются ли четыре числа a, b, c и d челенами верной пропорции. (паскаль) ​

djghjc13 djghjc13    1   18.10.2019 14:30    2

Ответы
Joon321 Joon321  10.10.2020 07:48

Объяснение:

program Proportion;

var

 a, b, c, d: Double;

begin

 Write ('a, b, c, d = ');

 ReadLn (a, b, c, d);

 if a / b =  c / d then

   WriteLn ('Пропорция верна.')

 else

   WriteLn ('Пропорция не верна.');

  ReadLn;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика