Студопедия

Главная страница Случайная страница

КАТЕГОРИИ:

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






Теоретичні відомості. Тема: Створення та реалізація програм з розгалуженням


⇐ ПредыдущаяСтр 94 из 98Следующая ⇒




ЛАБОРАТОРНА робота № 10

Тема: Створення та реалізація програм з розгалуженням

Мета: Навчитися складати блок-схеми алгоритмів з розгалуженнями та записувати їх на мові

програмування TurboPascal.

Обладнання та програмне забезпечення: комп’ютер IBM РС, ТурбоПаскаль.

Теоретичні відомості

Приклади програм:

Program dialog1; Var g: integer; Begin Write (‘ Скільки Вам років? ‘); Readln (g); If g> 10 then begin Writeln (‘ Ви вже дорослі ‘); Writeln (‘ Будемо вивчати Pascal ‘) end else writeln (‘ Вам ще треба підрости ‘);   writeln (‘ До побачення! ‘); Еnd.
Program dialog2; Var vid: string; Begin Write (‘Ви любите працювати з комп”ютером? ‘); Readln (vid); If vid = ‘так’ then Writeln (‘ Ви сучасна людина ‘) else begin writeln (‘Ви відстали від життя! ‘); writeln (‘ До побачення! ‘) end; writeln (‘Бажаю успіхів! ‘); readln Еnd.  
приклад 1 приклад 2

 

Приклад 3 Скласти програму обчислення

функції при будь-яких значеннях аргументів.


⇐ Предыдущая89909192939495969798Следующая ⇒
Поделиться с друзьями:
mylektsii.su - Мои Лекции - 2015-2024 год. (0.005 сек.)Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав Пожаловаться на материал