Напишіть алгоритм розрахунку S по формулі S=(x+2)/5 Значення х вводить людина

0 голосов
60 просмотров

Напишіть алгоритм розрахунку S по формулі S=(x+2)/5 Значення х вводить людина


Информатика (12 баллов) | 60 просмотров
0

На якій мові програмування оеалізувати алгоритм??

0

0

На мові Delphi

0

А на С++ не підійде??

0

Нажать ні( Я на С++ також вмію...

0

готово!

Дан 1 ответ
0 голосов

unit Unit1;

interface

uses

 System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,

 FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Edit,

 FMX.Controls.Presentation, FMX.StdCtrls;

type

 TForm1 = class(TForm)

   Button1: TButton;

   Edit1: TEdit;

   procedure Button1Click(Sender: TObject);

 private

   { Private declarations }

 public

   { Public declarations }

 end;

var

 Form1: TForm1;

  x, s: integer;

implementation

{$R *.fmx}

procedure TForm1.Button1Click(Sender: TObject);

begin

 x:=StrToInt(Edit1.Text);

 s:=(x+2)/5;

 Showmessage(IntTostr(s)+'ответ');

end;

end.


(24 баллов)