Nevíte-li si rady s jakýmkoliv matematickým problémem, toto místo je pro vás jako dělané.
Nástěnka
❗22. 8. 2021 (L) Přecházíme zpět na doménu forum.matweb.cz!
❗04.11.2016 (Jel.) Čtete, prosím, před vložení dotazu, děkuji!
❗23.10.2013 (Jel.) Zkuste před zadáním dotazu použít některý z online-nástrojů, konzultovat použití můžete v sekci CAS.
Nejste přihlášen(a). Přihlásit
Dobrý večer,
nevím si rady se zadáním programu do mého předmětu. Chtěl bych Vás tímto požádat o pomoc s níže zadanou úlohou. Program máme mít být vypracován ve vývojovém diagramu + v programu Delphi.
Program načte přirozené číslo N, dále číslo a (první člen geometrické posloupnosti) a q (kvocient) a vypíše prvních N členů této geometrické posloupnosti.
Děkuji za každou pomoc,
Vojta
Offline

Ahoj, a v čem je problém? Napsal jsem jednoduchý pseudokód.
nacti N;
nacti a_1;
nacti q;
init a_n = a_1;
if (N>0)
vypis a_n;
a_n=a_n*q;
N=N-1;
Offline
↑ vulkan66:
Omlouvám se, jsem v tom velice špatný. Co znamená init? Potřebuju z toho nějak udělat vývojový diagram, který následně udělám v deplhi.
Offline

V delphi neumím tak to napíšu v C++ a udělám komentáře, ať je to jasné.
int N; //deklarace N (celé číslo)
float a_1; //deklarace a_1 (desetinné číslo)
float q; //deklarace q (desetinné číslo)
int a_n = a_1; //deklarace a_n, do a_n zapiš první člen
int main()
{
cout << "Zadej N,q,a_1\n "; //vypiš a odřádkuj
cin >> N; //vstup od uživatele N
cin >> q; //vstup od uživatele q
cin >> a_1; //vstup od uživatele a_1
if(N>0) //podmínka pro cyklus
cout << a_n\n; //vypiš současný člen (1,2,3,...N-tý) posloupnosti a odřádkuj
a_n=*q //současný člen vynásob q a zapiš zpátky do a_n
N--; //zmenši N o 1 a vrať se do podmínky
else //pokud se N dostane na 0 (všechny členy 1 až N jsou vypsané) konec programu
return 0;
}Má to nějaké chyby, např. kdyby se zadalo záporné N tak program hned skončí, ale to není důležité.
Vývojový diagram by už neměl být problém.
Offline