Даны два действительных положительных числа x и y. Арифметические действия над числами пронумерованы (1 – сложение, 2 – вычитание, 3 – умножение, 4 – деление). Составьте программу, которая по введенному номеру выполняет то или иное действие над числами

Есть ответ
17.12.2022
367

Ответ


procedure TForm1.Button1Click(Sender: TObject);beginx:=strtoint(edit1.Text);y:=strtoint(edit2.Text);b:=strtoint(edit3.text);if b=1 then begin z:=x+y;edit4.Text:=floattostr(z);end;if b=2 then begin z:=x-y;edit4.Text:=floattostr(z);end;if b=3 then begin z:=x*y;edit4.Text:=floattostr(z);end;if b=4 then begin z:=x/y;edit4.Text:=floattostr(z);end;end;end.

 

 

вроде


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.