Results 1 to 8 of 8
Thread: Pascal
Hybrid View
-
14th December 2017 20:14 #1Registered User
Join Date: Dec:2017
Location:
Posts: 2
Pascal
program studenti;
type
Student = record
Ime: string;
EGN: integer;
Fakulteten: integer;
Ocenki: array [1..123456789] of integer;
end;
var x: Student; m:string; n,j,h,f:real;
begin
WriteLn('Èìå: '); Readln(m);
WriteLn('ÅÃÍ: '); Readln(n);
WriteLn('Ôàêóë& #242;åòåí íîìåð: '); Readln(j);
WriteLn('Îöåíê& #232;: '); Readln(f);
ReadLn;
end.
, ?
: ,, , . :
- ,
-
- .
-
14th December 2017 22:30 #2Asus CH6H|Ryzen 1800X@4.1GHz|4xBLS8G4D32AESTK@3666MHz 14-19-12-36-58-1T|GB GTX1060 3GB OC|MP510 960GB|SS-1000XP|CM STACKER STC-T01-UW1
Thermochill PA120.2+PA120.3+PA140.3|Yate Loon 5xD12SH-12+3xD14SH-12|Laing DDC 2+Toshiba DIYINHK|EK DDC X-Top v2+EK Reservoir|EK Supreme HF #6
-
15th December 2017 07:40 #3Registered User
Join Date: Dec:2017
Location:
Posts: 2
-
15th December 2017 11:53 #4
Join Date: Feb:2002
Location:
Posts: 724
- 25 , ... , .
- rager, . - , - , "" :
1. , .
2. , 1 . ?!?
3. , 3 .
, . .
, :
- , ;
- string[80] . 255. ;
- , , -, - EGN string[10]. - ( longInt , );
- ? "word", "integer" ;
- 11 (10 1 ) "real".
"":
- , ;
- - - , -. - , , (), . ,
- , , -, . .. "" , (, ). "", / / / , .. ( ). binary text, ;
- (), . . - , , ;
- ( ) ( , ) - , , ... , .
:
- (- ), / . , , ;
- , , "write" "writeln". , "" , . .. write("alabala: ");readln(a_de);, ... adblock-
hardwarebg.com##DIV[id^="helpfulanswers_box"]
-
15th December 2017 13:02 #5
Pascal, - . Pascal 64 . ( GetMem new), - 64. 64k , {$R-}.
, - , - .
-
15th December 2017 14:50 #6
-
16th December 2017 13:16 #7Registered User
Join Date: Oct:2003
Posts: 1,860
-
16th December 2017 14:31 #8
- ,
-
- .
-
Code:EGN: integer;
Last edited by ike; 16th December 2017 at 15:53.
Have no fear ike iz here.
CPU Cx486DLC@40MHz, RAM 4MB, VGA Trident 512KB, HDD Conner 160MB, Monitor 14" Color




Reply With Quote

Lenovo ThinkPad 15 IdeaPad 15
5th May 2023, 22:16 in