Illegal Expression's Pascal (New Errors) - 


program paidup;  const size=30;  var   payment,totm1,totm2,totm3:real;   section1,section2,section3,i,j,idnum:integer;   idnumarr:array[1..999] of integer;   paymentarr:array[1..size] of real;   procedure initialisevariables; {this procedure initialises variables used in program} begin   idnum:=0;   payment:=0;   totm1:=0;   totm2:=0;   totm3:=0;   section1:=0;   section2:=0;   section3:=0;   i:=0;   j:=0;  end; {initialise variables}  procedure declareandinitialisearrays; {this procedure declares , initialises arrays used in program}   begin      i:=1 size          begin               idnumarr[i]:=0;               paymentarr[i]:=0;          end; {ends statment} end; {declare , initialise variables}  procedure putdataintoarray; {this procedure puts data arrays} begin   while(idnum<>0) , (payment<>0) , (payment=1350) , (payment=1620) ,            (payment=1800) , (payment=1650) , (payment=1980) , (payment=2200)          begin               writeln('invalid value, please enter value');               readln(idnum);               readln(payment);          end;{ends while statement}               j:=j+1;               idnumarr[j]:=idnum;               paymentarr[j]:=payment; end; {put data array}  procedure determinestatisticsinformation; {this procedure determines masqueraders belong group, tallys total persons in section , totals amount of money paid in each section costumes}  begin   j:=1 size          begin               if(paymentarr[j]=1350) , (paymentarr[j]=1650)                   begin                        writeln('masquerader memid:idnum[j] belongs section1');                        section1:= section1+1;                        totm1:= totm1+paymentarr[j];                   end;{ends if statement}               if(paymentarr[j]=1620) , (paymentarr[j]=1980)                   begin                        writeln('masquerader memid:idnum[j] belongs section2');                        section2:= section2+1;                        totm2:=totm2+paymentarr[j];                   end;{ends if statement}               if(paymentarr[j]=1800) , (paymentarr[j]=2200)then                   begin                        writeln('masquerader memid:idnum[j] belongs section3');                        section3:= section3+1;                        totm3:=totm3+paymentarr[j];                   end;{ends if statement} end; {determine statistics information}  procedure printresults; {this procedure outputs information} begin   writeln('the number of masqueraders in section 1 is:', section1);   writeln('the number of masqueraders in section 2 is:', section2);   writeln('the number of masqueraders in section 3 is:', section3);   writeln('total amount of money paid in section 1 is:', totm1);   writeln('total amount of money paid in section 2 is:', totm2);   writeln('total amount of money paid in section 3 is:', totm3); end. {print results}

the errors got were: 77 / 11 paidup.pas error: illegal expression 77 / 11 paidup.pas error: illegal expression 77 / 11 paidup.pas fatal: syntax error, ; expected identifier printresults found

you still missing end statement match begin statement follows for j:=1 size do in procedure determinestatisticsinformation.

also, while condition while(idnum<>0) , (payment<>0) , (payment=1350) , (payment=1620) , (payment=1800) , (payment=1650) , (payment=1980) , (payment=2200) do in procedure putdataintoarray never true impossible payment simultaneously equal 1350 , equal 1620 etc...


Comments

Post a Comment

Popular posts from this blog

authentication - Mongodb revoke acccess to connect test database -

i have ec2 instance mongodb 3.2.0 installed. have user admin access. can connect user , perform operation remotely. 1 can connect database test remote if knows ip mongo 11.11.11.11. although not able make operations, want restrict access user credentials can connect server. first need create users , grant roles users, example: use admin db.createuser( { user: "myuseradmin", pwd: "abc123", roles: [ { role: "useradminanydatabase", db: "admin" } ] } ) then need start server --auth parameter mongod --auth more information here
Read more

r - Update two sets of radiobuttons reactively - shiny -

i have read ( how make choices in radiobuttons reactive in shiny? ) shows me how update radiobutton s in reactive way. however, when try , update 2 sets of buttons same data, 1 set renders. example: server: # create example data wafer <- rep(c(1:3), each=3) length <- c(1,1,2,1,1,1,3,5,1) width <- c(3,1,6,1,1,1,1,1,6) dd <- data.frame(wafer, length, width) shinyserver(function(input, output, session){ # create reactive dataframe store data values <- reactivevalues() values$df <- data.frame() # lengths , widths of wafer user input <- eventreactive(input$do, { subset(dd, wafer %in% input$wafer, select = length:width) }) # update reactive data frame lengths , widths have been selected user input observe({ if(!is.null(a())) { values$df <- rbind(isolate(values$df), a()) } }) output$wl <- renderdatatable({ a() }) # update radio buttons unique length , widths stored in values$df # ever "observe" put first in co...
Read more

ios - Realm over CoreData should I use NSFetchedResultController or a Dictionary? -

i'm working on app using core data , nsfetchedresultcontroller many reasons switch use realm. saw there "realm version" of nsfetchedresultcontroller on github wouldn't compatible current code using core data. the view controller displaying list of people same school, address book. list sublist of people studied in same city. so thinking make 1 unique request database retrieve list of people , filter locally list within 1 dictionary per school [string: anyobject] string section name within tableview , anyobject array of people. first solution, make nsfetchedresultcontroller each school predicate filtering location. delete actions etc.. handled delegates -> not compatible realm create dictionaries , update them each actions... -> works realm it's annoying code. any better solution? edit: i need clarify request: i'd write class inherit uitableviewcontroller. this class has list of people sorted in alphabetical order the tableview has ...
Read more