Wpis z mikrobloga

Mirki z programowanie. Robię zadanie z #pascal , w którym program ma zsumować wszystkie wypisane parametry podane przez użytkownika.

Co mam źle, że program działa, ale gaśnie? :|

program zadanie1;
uses sysutils;

var
suma : Integer;
a : Integer;

begin
suma := 0;
for a := 1 to ParamCount do
suma := suma + StrToInt(ParamStr(a));

Writeln('Suma twoich argumentów to ', suma);
end.
  • 6
  • Odpowiedz
  • Otrzymuj powiadomienia
    o nowych komentarzach

@Rizi3N: Daj readkey ale nie zapisuj wyniku. Program poczeka na reakcje użytkownika (naciśnięcie dowolnego klawisza) a potem się zakończy.
Jak nie działa daj 2x readkey i powinno działać.
  • Odpowiedz