1 / 7

ALGORITMIZACE A ZÁKLADY PROGRAMOVÁNÍ

ALGORITMIZACE A ZÁKLADY PROGRAMOVÁNÍ. CYKLUS S PŘEDEM DANÝM POČTEM OPAKOVÁNÍ – SOUČIN POMOCÍ SOUČTU Vytvořila: RNDr. Ivanka Dvořáčková Gymnázium K. V. Raise, Hlinsko, Adámkova 55 březen 2013. Součin pomocí součtu. Vytvořte

lars-rollins
Download Presentation

ALGORITMIZACE A ZÁKLADY PROGRAMOVÁNÍ

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. ALGORITMIZACE A ZÁKLADY PROGRAMOVÁNÍ CYKLUS S PŘEDEM DANÝM POČTEM OPAKOVÁNÍ – SOUČIN POMOCÍ SOUČTU Vytvořila: RNDr. Ivanka Dvořáčková Gymnázium K. V. Raise, Hlinsko, Adámkova 55 březen 2013

  2. Součin pomocí součtu Vytvořte a) algoritmus pro výpočet součinu dvou přirozených čísel A, B pomocí součtu, b) přepište algoritmus do programovacího jazyka Pascal, c) spusťte program Free Pascal, nastavte složku pro ukládání souboru do určeného místa, d) vytvořte nový soubor a uložte pod názvem soucinabdo určené složky, e) přepište do počítače vytvořený program a odlaďte jej, f) ve zbývajícím čase uživatelsky vylepšete (např. barvy apod.), případně vytvořte v počítači jiný způsob.

  3. program SOUCIN_POMOCI_SOUCTU; uses CRT; var A, B, N, I: integer; begin clrscr; writeln (’ * * * SOUČIN ČÍSEL POMOCÍ SOUČTU * * * ’); write (’Zadejdvěpřirozenáčísla A, B: ’); readln (A, B); S := 0; for I := 1 to A do S := S + B; writeln (’Součin je ’, S : 1, ’. ’); readkey end.

  4. program SOUCIN_POMOCI_SOUCTU; uses CRT; var A, B, N, I: integer; begin clrscr; writeln (’ * * * SOUČIN ČÍSEL POMOCÍ SOUČTU * * * ’); write (’Zadejdvěpřirozenáčísla A, B: ’); readln (A, B); S := 0; for I := 1 to B do S := S + A; writeln (’Součin je ’, S : 1, ’. ’); readkey end.

  5. Použité zdroje Všechny grafické prvky a obrázky algoritmů jsem vytvořila sama s využitím volně šiřitelného programu Open Office. HUBKA, J. a L. SILVERIO. Sbírka příkladů ze základů programování. Krajský pedagogický ústav Hradec Králové: Sdružení uživatelů počítačů JSEP a SMEP Hradec Králové, 1988.

More Related