Даны три числа. если их произведение меньше 50, то числа увеличить в 10 раз. составить программу в delphi

drsamsoff drsamsoff    3   07.07.2019 09:20    0

Ответы
kozinasofia2006 kozinasofia2006  02.10.2020 22:03
A:=strtofloat(edit1.text);
b:=strtofloat(edit1.text);
c:=strtofloat(edit1.text);
d:=a*b*c;
if d<50 then
begin
a:=a*10;
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика