Results 1 to 2 of 2

Thread: .

Hybrid View

Previous Post Previous Post   Next Post Next Post
  1. #1
    Registered User
    Join Date: Dec:2008
    Location:
    Posts: 438

    .

    .

    program masiv;
    Type TStudent=record
    EGN, FAKN: string[10];
    O: array[1..10] of real;
    Sr: real;
    End;
    Var m: array[1..40] of Tstudent;
    C: integer


    ? m,c,TStudent
    m,c,EGN,FAKN,O,SR ? Type.

  2. #2
    Registered User hateras's Avatar
    Join Date: Jan:2011
    Location: Kronos III
    Posts: 1,028
    ?
    m Tstudent
    C?
    Code:
    for i = 1 to 40 do begin
      writeln(m[i].EGN);
      writeln(m[i].FAKN);
      for j = 1 to 10 do begin
        writeln(m[i].O[j]);
      end;
      writeln(m[i].sr);
    end;
    , m /, /.
    ASRock B550M Pro 4; Ryzen R5 3600; 2x16 GiB G.SKILL Aegis 3200; 1TB Samsung QVO 960 + 3TB Seagate IronWolf; Zalman Z1

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Copyright © 1999-2011 . .
iskamPC.com | mobility.BG | Bloody's Techblog | | 3D Vision Blog |