Pereiti prie turinio

HighVoltage

Patvirtinti nariai
  • Pranešimai

    261
  • Užsiregistravo

  • Lankėsi

  • Atsiliepimai

    100%

HighVoltage Pranešimai

  1. program klientai;
    var t, i, n : integer;
    
    begin
    WriteLn('Įveskite kiek žmonių stovi prie kasos');
    	ReadLn ( n );
    WriteLn ('Įveskite kiek laiko kasininkė skiria kiekvienam klientui');
    	ReadLn ( t );
    for n := 1 to n do
    	begin
    		i := i + t;
    		WriteLn ( n,' Žmogus sugaišo laiko: ', i);
    	end;
    end.

     

    Esu taip pat pradedantysis, bet atrodo, kad turėtų būti taip pagal užduotį.

×
×
  • Pasirinkite naujai kuriamo turinio tipą...