-, , . , ( ). while, while-. Pascal :
while <> do
begin
< >
end;
:
while(<>)
{
< >
}
WHILE
:
WHILE DO
- WHILE, DO - (, )
-
- .
:
, , DO. .
, WHILE , .. .
-, . , . repeat..until; dowhile.
Pascal ::
repeat
< >
until < >
:
do
{
< >
}
while(< >)
REPEAT
:
REPEAT UNTIL
- REPEAT, UNTIL - (, )
-
-
:
, . , , REPEAT .
. , , ( , , ), ( , , ).
.
- , () .
.
, , . , ,
TYPE <>
< >
- - - - - - - - -
END TYPE
TYPE BD
Day as integer
Month
Year
END TYPE
TYPE Stud
FIO as string
BD as BD
END TYPE
DIM student as stud
|
|
Student BDay/Day = 12
FIO =
() , ( ) , .
( ). , , , ( Pascal, . ).
(array) , ;
(record) , ;
(file) , (: !).
, , .
, 60-70- XX , . "", .