.


:




:

































 

 

 

 





70- 20 , .. , .

Windows Borland Delphi.

1. .

Program ;

Label ;

Const ;

Type , ;

Var ;

Function ( );

Procedure ( );

BEGIN

END.

2. .

()

Const A=abc; //

B=2.782; //

K=50000 // .

( )

Var j: integer; //

r, d: real; //

t: boolean; // ( )

c: char; //

r: string[ 10 ]; // 10

:

Type G =array [ 1..100 ] of integer; // 100

= array [ 1..20 ] of real; // 20

S= array [ 1..25 ] of char; // 25

M= array [ 1..2, 1..3 ] of integer; // 6

Type

= record

: integer;

: array[1..18] of char;

: array[1..35] of char;

: array [1..20] of char;

_: integer;

__: real

End;

, .

Var : ;

: array[1..K] of ; //

3. .

begin
end
, := ;
if then else ; case of : ; : ; : else end;
read ( ); readln ( );
write( ); writeln();
for:= to (downto) do ;
while do;( - )
repeat until; ( , .. )

. , , 1 5 0,5.

PROGRAM one; //

VAR a, b, h: real;

x, y: real;

BEGIN

write ( ); read(a);

write ( ); read(b);

write (); read(h);

x:=a;

writeln( x y); //

while (x<=b) do begin //

y:= sqrt(x);

writeln(x, y);

x:=x+h //

end;

write()

END.





:


: 2015-11-05; !; : 437 |


:

:

- , 20 40 . - .
==> ...

1670 - | 1614 -


© 2015-2024 lektsii.org - -

: 0.014 .