Nie mogę rozgryźć pewnego problemu i nie mam za bardzo możliwości wspomóc się czyimś wyjaśnieniem. Gdy mam następujący program:
Kod: Zaznacz cały
program zadanie;
var
i:integer;x,s:real;
begin
s:=0;
i:=0;
repeat
readln(x);
s:=s+x;
i:=i+1;
until x=0;
writeln(s,i);
end.
Czy mógł napisać mi ktoś w całości schemat blokowy do tego?
2. Wiem że to dość proste, ale w przypadku schematów blokowych chyba (przynajmniej jak na razie) nie ma dla mnie prostych rzeczy;
Należy podać schemat algorytmu sprawdzającego, czy dane a,b,c,d tworzą ciąg geometryczny. Zrobiłem coś takiego:
Mam nadzieję na pomoc, pozdrawiam.