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

Ответы:

МАКСИМ БЫК

14-05-2017 16:38

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. вроде

Также наши пользователи интересуются:

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Даны два действительных положительных числа x и y. Арифметические действия над числами пронумерованы (1 – сложение, 2 – вычитание, 3 – умножение, 4 – деление). Составьте программу, которая по введенному номеру выполняет то или иное действие над числами» от пользователя Тема Гришин в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!