8
-
. 541 ..
. .
..
2016
: -.
1.
Write WriteLn
Write (. ) - , . WriteLn , Ln (line - . , ), , .
:
Write ( )
WriteLn ( )
Write WriteLn , . , , , , .
, WriteLn( ,), , , .
WriteLn . . .
Read ReadLn
- . , , , . Read ReadLn. .
:
Read(, ...)
ReadLn(, ...)
Read . . .
, 53 , Read(a,b) 53, b - . , , , Var; :integer, b:char.
Read ReadLn . ReadLn : <Enter> . .
2.
1.
:.
:
1) ;
2) ;
3) .
program v81;
Var
a,b:integer;
c,d:char;
e,f:string;
Begin
readln(a,b);
readln(c,d);
read(e,f);
writeln('a= ',a,'b= ',b);
writeln('c= ',c,'d= ',d);
writeln('e= ',e,'f= ',f);
end.
?
|
|
|
: , , , a b , .
16-
:
1) ;
2) .
:
1) 
$A $B;
2) 
10 11.
?
program v82;
Var
a,b:integer;
c,d:real;
Begin
read(a,b,c,d);
write('a=',a,'b=',b,'c=',c,'d=',d);
end.
: , 10- , .
4 .
:
1) abcd;
2) abcd.
?
program v83;
Var
a,b,c,d:char;
Begin
read(a,b,c,d);
write('a=',a,' b=',b,' c=',c,' d=',d);
end.
