1 / 15

Команда вибору

Команда вибору. Case. Два варіанти. if умова then команда1 else команда2;. Остача від ділення на 2 = 0?. Так, число парне. Ні, число непарне. Три варіанти. if умова then команда1 else if умова2 then команда2 else команда3;. Температура води >100?. Температура води >0?.

susan
Download Presentation

Команда вибору

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. Команда вибору Case НВК "Школа-гімназія "Сихівська"

  2. Два варіанти if умоваthen команда1else команда2; Остача від ділення на 2 = 0? Так, число парне Ні, число непарне НВК "Школа-гімназія "Сихівська"

  3. Три варіанти if умоваthen команда1else if умова2 then команда2 elseкоманда3; Температура води>100? Температура води>0? Так, це пара Ні, це лід Так, це рідина НВК "Школа-гімназія "Сихівська"

  4. Чотири варіанти • . . . ? • Це вже не просто умова, це вибір НВК "Школа-гімназія "Сихівська"

  5. Команда вибору caseзмінна(вираз)of значення1 : команда1; значення2 : команда2; значення3 : команда3 elseкоманда4; end; НВК "Школа-гімназія "Сихівська"

  6. Задача 1 • За номером дня тижня вивести повідомлення: • Робочий день • Вихідний день • Такого дня немає (>7) НВК "Школа-гімназія "Сихівська"

  7. Програма program p1; var a:integer; begin write('Vveditnomerdnya'); readln(a); case a of 1..5:writeln('Robota'); 6,7:writeln('Vyhidnyy') else writeln('Error!'); end; readln; end. НВК "Школа-гімназія "Сихівська"

  8. Задача 2 • Дано номер місяця. Виведіть на екран кількість днів у цьому місяці. НВК "Школа-гімназія "Сихівська"

  9. Програма program p2; var a:integer; begin write('Vveditnomermisyacya'); readln(a); case a of 1,3,5,7,8,10,12:writeln('31 den'); 4,6,9,11:writeln('30 dniv'); 2:writeln('28 abo 29 dniv') else writeln('Error!'); end; readln; end. НВК "Школа-гімназія "Сихівська"

  10. Задача 3 • Написати програму, яка запитує два цілих числа та виконує одну із дій, позначених 1,2,3:1 – знаходження суми чисел;2 – знаходження модулю різниці чисел;3 – знаходження добутку чисел;Програма повинна виконати завдання, номер якого буде введено. НВК "Школа-гімназія "Сихівська"

  11. Послідовність тварин така: • rat (пацюк), • ох (корова), • tiger (тигр), • rabbit (кролик), • dragon (дракон), • snake (змія), • horse (кінь), • sheep (овечка), • monkey (мавпа) , • rooster (півень) , • dog (собака), • ріg (свиня). Задача 4 За китайським календарем існують цикли тривалістю 12 років. От наприклад, 2009 рік був роком Корови (ох), 2010 - Тигра (tiger). НВК "Школа-гімназія "Сихівська"

  12. 2011 рік - кролика • 2011 div 12 = 167 • 2011 mod 12 = 7 • 2010 mod 12 = 6 (був рік тигра) • 2009 mod 12 = 5 (був рік корови) • . . . НВК "Школа-гімназія "Сихівська"

  13. program p4; var a:integer; begin write('Vveditrik'); readln(a); case a mod 12 of 1 :writeln('rooster'); 2:writeln('dog'); 3:writeln('pig'); 4:writeln('rat'); 5:writeln('ox'); 6:writeln('tiger'); 7:writeln('rabbit'); 8:writeln('dragon'); 9:writeln('snake'); 10:writeln('horse'); 11:writeln('sheep'); 0:writeln('monkey'); end; readln; end. НВК "Школа-гімназія "Сихівська"

  14. Цикл кольорів: • teal(синьо-зелений), • teal(синьо-зелекий), • red(червоний), • red(червоний), • yellow(жовтий), • yellow(жовтий) , • white(білий), • white(білий), • black(чорний), • black(чорний). Задача 5 Є ще один цикл довжиною по 10 років. Зокрема: 2009 - yellow (жовтий), 2010 - white (білий). НВК "Школа-гімназія "Сихівська"

  15. Задача 6 • Дано ціле число від 100 до 999. Вивести рядок – опис цього числа. Наприклад, 256 – двісті п’ятдесят шість. НВК "Школа-гімназія "Сихівська"

More Related