Презентація на тему:
Конструкції

Так чи ні? (з використанням циклів) НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

Цикл Конструкція, яка дозволяє повторити виконання команд певну кількість разів Цикл з параметром Найчастіше параметр називають змінною i Параметр циклу завжди integer for i:=1 to число do begin    команди  end; НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

Задача 1 Дано n цілих чисел. З’ясуйте, чи є в цій послідовності хоча б одне число 0. Припускаємо, що немає (змінна-показник) Якщо зустрічається 0, то показник змінює значення Друкуємо результат, залежно від значення показника НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

Змінна-показник Може бути двох типів: Цілий integer 1 0 Логічний boolean true false НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

program p1;  var i,n,a:integer; k:boolean; begin  write(‘Vvedit n’); readln(n); k:=false; for i:=1 to n do  begin    write(‘Vvedit chyslo’); readln(a);    if a=0 then k:=true;  end;    if k=true then writeln(‘Je 0')else writeln(‘Nema 0'); readln; end. НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

Задача 2 Дано n чисел. З’ясуйте, чи всі вони 0. Показник має мінятись, як тільки знайшли число, відмінне від 0. НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

program p1;  var i,n,a:integer; k:boolean; begin  write(‘Vvedit n’); readln(n); k:=false; for i:=1 to n do  begin    write(‘Vvedit chyslo’); readln(a);    if a0 then k:=true;  end;    if k=true then writeln(‘Ne vsi 0')else writeln(‘Vsi 0'); readln; end. НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

Сформулюйте умови Ввести з клавіатури n будь-яких чисел. Чи є серед цих n чисел від’ємні числа? Дано n цілих чисел. З’ясуйте, чи є в цій послідовності хоча б одне число, що закінчується цифрою 5. НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

Самостійно Ввести з клавіатури число x та n будь-яких чисел. Чи є серед цих чисел число x? Дано n цілих чисел. З’ясуйте, чи є в цій послідовності хоча б одне двохзначне число, що складається з однакових цифр. НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

Дві змінні НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

Задача 1 Дано n дійсних чисел. Чи є ця послідовність зростаючою? Якщо кожне „наступне” число більше „попереднього”, то надрукувати yes, якщо є число яке менше чи дорівнює тому що перед ним, то надрукувати no НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

Перед циклом потрібно ввести перше число у змінну (a1). Воно буде „попереднім” У циклі for i:=2 to n do (цикл від 2, бо одне число вже ввели): Вводиться „наступне” число у змінну (a2) З числами a1 та a2 виконуються необхідні дії, наприклад їх порівнюють Перед переходом на наступний виток циклу „наступне” значення повинно стати „попереднім”. Для цього використовують присвоювання a1:=a2. Після завершення циклу виводять на екран результат НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

 var i,n,a1,a2:integer; k:boolean; begin write(‘Vvedit n’); readln(n);   read(a1); k:=true; for i:=2 to n do  begin    read(a2);    if a2

Задача 2 Ввести з клавіатури n будь-яких цілих чисел. З’ясуйте, чи створюють ці числа зростаючу арифметичну прогресію? тобто чи є різниця між „наступним” та „попереднім” числами додатною та однаковою для всіх чисел НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"

Самостійно Дано n цілих чисел. З’ясуйте, чи є ця послідовність знакозмінною, тобто такою, в якій два сусідніх числа мають різні знаки. Відповідь: „так” чи „ні” Дано n цілих чисел. Із кожних двох різних „сусідніх” чисел виведіть на екран найбільше НВК "Школа-гімназія "Сихівська" НВК "Школа-гімназія "Сихівська"