Урок 28. Створення програм з використанням структури повторення з передумовою.

1. Прочитайте та запам’ятайте.

Команда циклу з передумовою (while) має вигляд:

while <логічний вираз> do begin <команди тіла циклу> end;

Дія команди: Доки значення логічного виразу істинне, виконуються команди тіла циклу.

Наприклад: Нехай змінні x, s мають значення x=4, s=0. Після виконання команди

while x<=8 do

begin

s:=s+x;

x:=x+1;

end;

вони набудуть значень:

s

x

0

4

4

5

9

6

15

7

22

8

30

9

Тобто, команди виконувалися доти, доки x був менший або рівний числу 8. Як тільки x став рівним 9, команди циклу більше не виконуються.

2. Виконуємо вправи.

Онлайн компілятор мови програмування Pascal.

1. Вивести таблицю чисел від 20 до 30, їхні квадрати та куби. (Перегляньте та повторіть код програми за допомогою онлайн компілятора мови програмування Pascal)

Надішліть мені фотозвіт про виконану роботу.

2. За заданим текстовим алгоритмом напишіть програму на мові програмування Pascal (використайте Онлайн компілятор мови програмування Pascal.) для розв’язування наступної задачі:

“Скласти програму, яка б виводила скільки товару можна купити на вказану суму при вказаній ціні.”

Введіть назву програми;

В розділі змінних вкажіть змінні для ціни, суми, кількості товару, вартості типу дійсних чисел;

Почніть виконувану частину програми

Вкажіть комп’ютеру написати, щоб користувач ввів ціну товару;

Вкажіть комп’ютеру прочитати введене число у відповідну змінну;

Вкажіть комп’ютеру написати, щоб користувач ввів вказану суму;

Вкажіть комп’ютеру прочитати введене число у відповідну змінну;

Надайте початкове значення вартості рівне 0;

Надайте початкове значення кількості рівне 1;

Розпочніть цикл поки вартість <= вказаній сумі виконуй наступні команди:

вартість:=ціну*на кількість;

кількості:=кількість+1;

Вкажіть комп’ютеру вивести результат кількості;

закінчіть виконання програми.

Надішліть мені фотозвіт про виконану роботу.

Якщо в процесі роботи виникають якісь питання, то також звертайтеся через електронну адресу або вайбер

електронна адреса: shkolabilin1@gmail.com

вайбер: +380930158447

Домашнє завдання: Опрацювати лекційний матеріал.