Niezalogowany (Zaloguj się)
WItaj Gościu! Możesz się teraz zalogować lub poprosić o członkowstwo na Forum Turbo Pascal Web Pag

Turbo Pascal: [Utopiony] Napisz program który zsumuje 10 liczb rzeczywistych podanych przez uzytkownika i wyświetli wynik z

W dół

Od 1 do 1 z 1

  1.  
  1.  
    program liczb10;
    var
    liczba,x:integer;
    suma:0
    for x: 1to10do
    begin
    writeln (podaj liczbe nr:''x);
    readln (liczba);
    suma:=suma+liczba
    end;
    writeln(suma tych liczb wynosi ''suma:4;2);
    readln;
    end.

Od 1 do 1 z 1

  1.