Program w TurboPascalu który wykorzystując pętle doda 100 liczb podanych przez użytkownika a następnie je zsumuje.
Jeżeli możesz wytłumacz działanie podanego programu wystarczą mi podane same pętle.
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.
jak chcesz całe źródło napisz na pw a tutaj napiszę Ci jak masz to zrobic.
są 2 sposoby ale nie wiem o który Ci chodzi.
robisz tablice dla 100 elementów np. l tab:ARRAY[1..100] of real
1.potem pętla for np.
for i=1 to 100 do
begin
write('podaj liczbe: '); write(i);
readln(tab[i]);
end;
ta w pętla wczyta Ci sto liczb
żeby dodać robisz zmienna np suma i też pętla
for i=1 to 100 do
begin
suma:=suma+tab[i];
end;
2 sposob to robisz w jednej pętli:
for i=1 to 100 do
begin
write('podaj liczbe: '); write(i);
readln(tab[i]);
suma:=suma+tab[i];
end;
mam nadzieję że to dość zrozumiała jak coś pisz na pw;)