Помогите плиз. надо всё в PascalAbc.net. Created by ernesto13. informatika-ru

Помогите плиз. надо всё в PascalAbc.net...

December 2021 1 9 Report

Помогите плиз. надо всё в PascalAbc.net

Answers & Comments

Giammy //PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)

1)
begin
Println('Периметр=',ReadInteger+ReadInteger+ReadInteger);
end.

2)
begin
var r:=ReadInteger('r=');
Println('Площадь=',3.1415*sqr(r)); Println('Длина окружности=',2*3.1415*r);
end.

3)
uses FormsABC;
var a,b,res:realfield;
procedure plus:= res.Value := a.Value + b.Value;
procedure min:= res.Value := a.Value - b.Value;
procedure umn:= res.Value := a.Value * b.Value;
procedure delit:= res.Value := a.Value / b.Value;
begin
MainForm.SetSize(250,175);
a := new RealField('a:');
b := new RealField('b:');
LineBreak;
EmptySpace(40);
var p:=new Button('+'); p.Width:=25; p.Click+= plus;
var m:=new Button('-'); m.Width:=25; m.Click+= min;
var u:=new Button('*'); u.Width:=25; u.Click+= umn;
var d:=new Button('/'); d.Width:=25; d.Click+= delit;
res := new RealField('Результат',220);
end.

1 votes Thanks 1

Answers & Comments

sdelajte pliz sochinenie i 2 zadanie

preobrazujte v mnogochlen 1 x232n 3n33n93y 424m 335x326cb1e1d5dc17b4a9afa511e6d0faa14a0 7234

preobrazujte v mnogochlen 1 x232n 3n33n93y 424m 335x3263ea8d39f0532797c9080f369515ae112 70824

preobrazujte v mnogochlen 1 x232n 3n33n93y 424m 335x326

pliz zadanie 1 sochinenie

1) (x+2)^32)(n-3)(n^3+3n+9)3)(y-4)^24)(m-3)^35)(x+3)^26)(d+1)(a^2-a+1)...

sdelajte pliz34551a4b11d9bc4b5e9a89f8f7cdae10 92565

pliz pomogite vsyo v pascalabcnet

pliz pomogite vsyo nado v pascalabcnet

рекомендуемые вопросы

Helpful Links

Helpful Social