Question

Write a complete program that declares an integer variable, reads a value from the keyboard into that variable, and writes to standard output the variable's value, twice the value, and the square of the value, separated by spaces. besides the numbers, nothing else should be written to standard output except for spaces separating the values.

Answer 1

The programming language to use here is not stated, so standard output is not clear. A solution using text boxes for input and output can be given in Delphi:

unit Unit2;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type TForm2 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;

procedure FormCreate(Sender: TObject);
private { Private declarations }
public { Public declarations }
end;
var Form2: TForm2;
implementation
{$R *.dfm}
procedure TForm2.FormCreate(Sender: TObject);
var i: integer;
txtline: string;
begin
i := StrToInt(edit1.text);
txtline := IntToStr(i) + ', ' + IntToStr(2 * i) + ', ' + IntToStr(i * i); edit2.text := txtline;
end;
end.