Vāverēns miniblogs

  • -2

    Izpalīdziet lūdzu. Palūdza uztaisīt pascal darbu, tikai nevaru saprast kā dabūt šo fīču. Vajag, lai a:=MALA*MALA; atkārtojas, kad piespiests enter. Programma izskatās šādi:
    var MALA, a:real;
    begin
    randomize;
    MALA:=random(44)+12;
    a:=MALA*MALA;
    WriteLn('Kvadrāta laukums ir ', a:0:2,' kvadrātmetri');
    Readln;
    end.

    • Hidden driver
      +4

      Pirms spied enter uzklikšķini uz program.exe un sanāks.

      • Hidden driver
        +5

        For real tho
        If (readkey() == enter) { izsauc funkciju } else { return; } end;

        • Vāverēns
          -2

          Paldies labais cilvēk :-) Btw, kas jāliek iekšā šeit? { return; }