, . , , .
. , . , , , .
, , , :
(package) (variable) (statement)
:
with _; use procedure _
: __;
begin
_1;
_2;
end _;
_ .
: __ . , "__"? . , Variable : Integer; . , Variable : Float; ..
, .
begin .
_1; _1; ; , .
end . , "" , , . , , ;-) "Hello World", .
with Ada.Text_IO; use Ada.Text_IO;
procedure Hello_World is
-- :)
begin
Put ("Hello world!");
end Hello_World;
"Text_IO" /;
( ) "Hello_World." "with" "use" . , hello_world.ada hello_world.adb
, , . (--) " :)". , Put ("Hello world!"); .
, , . "Put "Hello world!";"!
, Notice also that many of the names begin with capital letters ("Text_IO" ). - , .
. / :
with Ada.Text_IO; use Ada.Text_IO;
procedure Get_Name is
Name : String (1..80);
Length : Integer;
begin
Put (" > ");
Get_Line (Name, Length);
New_Line;
Put (" ");
Put (Name (1..Length));
Put (", !");
end Get_Name;
? , Text_IO , procedure is
Name , String (1..80) , Name 80 . , Length , .
: , " > ", . Enter (New_Line; ) " [ ], !".
,
10.11.2021 - 12:37: - Personalias -> WHO IS WHO - - _. - Conscience -> . ? - _., , - Upbringing, Inlightening, Education -> ... - _. - Ecology -> - _., - War, Politics and Science -> - _., - War, Politics and Science -> . - _., , - Upbringing, Inlightening, Education -> , - _. - New Technologies -> , 5G- - _. - Ecology -> - _. - Ecology -> - _., , - Upbringing, Inlightening, Education -> - _., , - Upbringing, Inlightening, Education -> - _.
