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

Задача 3. Скласти программу знаходження суми 10 довільних чисел введених з клавіатури

Читайте также:
  1. C) Любой код может быть вирусом для строго определенной среды (обратная задача вируса)
  2. CИТУАЦІЙНА ЗАДАЧА ДО БІЛЕТА № 36
  3. III. В ЧЕМ СОСТОИТ ПРЕДМЕТ И ЗАДАЧА ФИЛОСОФИИ?
  4. III. Організація роботи з підготовки та направлення структурними підрозділами органів ДПС запитів на встановлення місцезнаходження платника податків
  5. IV. Дії підрозділів податкової міліції при отриманні запитів на встановлення місцезнаходження платника податків
  6. Австралопітеки:різновиди, датування, місця знаходження
  7. Але спочатку фашистські, як, власне, й більшовицькі групи в Росії та націонал-соціалістичні – у Німеччині, були малочисельними й малопомітними в політичному житті.
  8. Анализ чувствительности управленческих решений в задачах линейного программирования.
  9. Багатокритеріальність у задачах прийняття рішень.
  10. БУДУЩЕЕ – ПЕРЕД ВАМИ СТОИТ НЕЛЕГКАЯ ЗАДАЧА. В ОДИНОЧКУ ВЫ С НЕЙ НЕ СПРАВИТЕСЬ.
  11. ВАША ПЕРВАЯ ЗАДАЧА
  12. Взаємне положення площин. Перша позиційна задача

Хід уроку

I. Організаційний момент. (3 хвилини)

Перевірка присутності. Перевірка наявності домашнього завдання.

II. Перевірка домашнього завдання. Опитування “Організація алгоритмів розгалуження та повторення мовою Turbo Pascal”.

Питання до класу:

1) Які форми умовного оператора, ви використовували при розв’язанні домашнього завдання?

2) Які оператори повторення Ви знаєте?

3) Як описується і використовується вказівка повторення з передумовою?

4) Як описується і використовується вказівка повторення з післяумовою?

5) Як описується і використовується вказівка повторення з параметрами?

IІІ. Практична робота 8 «Складання програм з використанням алгоритмічної структури повторення.»

(Додаток 1)

Опорний конспект.

Початковий, середній рівень – задача1, 2.

Достатній, високий рівень – задача 3, 4, 5. Доповнити 2-м варіантом розв’язку.

Алгоритм виконання практичної роботи:

1) Набрати в середовищі програмування програму.

2) Виконати компіляцію програми.

3) Зафіксувати результат виконання.

4) Зберегти файл розв’язку.

ІV. Короткий розбір домашнього завдання на наступне заняття.

Скласти програми розв’язку задач.

1) Ввести число А, вивести всі його дільники та підрахувати їх загальну кількість.

2) Ввести 6 елементів з клавіатури, визначити серед них найбільший.

3) Ввести дві змінні X та Y. Обчислити арифметичні дії за введеним знаком d: + - * / (додавання, віднімання, множення, ділення). Результат присвоїти змінній Z, та вивести.*

4) Намалювати малюнок знаками: зірочка * або #,, використовуючи оператори циклу. *

V. Підведення підсумків уроку.

Запитання для бесіди:

1. Як ви гадаєте, чи виконали ми ті завдання, що поставили на початку уроку?

2. Які труднощі виникали у вас протягом уроку?

3. Що ви порадите однокласникам для подолання труднощів, що виникали?

Д/з. Скласти програми 1-4. За рівнем складності.


ДОДАТОК 1.

Задача 1. Вивести декілька разів своє ім’я або декілька разів своє ім’я та ім’я сусіда.

Program ima;

Uses crt;

Var i:integer; {і-лічільник}

Begin Clrscr;

Writeln(‘Виведення 5 разів свого імені в один рядок’); Writeln(‘---------------------------------’); For i:=1 to 5 do begin Write (‘Анастасія ’); End; Writeln(‘Виведення 7 разів свого імені та імені сусіда’); Writeln(‘----------------------------------’); For i:=7 downto 1 do begin Writeln (‘Анастасія та Олена’); End;

Readln;

End.

 

Задача 2. Скласти програму підрахунку факторіала числа. Наприклад 10! (f=1*2*3*4*5*6*7*8*9*10)

Program factoril;

Uses crt;

Var i:integer; {і-лічільник}

A:integer; f: real; {А – число f – результат}

Begin Clrscr;

Writeln(‘Розрахувати факторіал числа’); Write(‘введіть число A=’); Readln(A); f:=1; {початкове значення добутку} Writeln(‘---------------------------------’); For i:=1 to А do begin f:=f*i; End; Writeln(‘Розрахувати факторіал числа’); Write(‘введіть число A=’); Readln(A); f:=1; {початкове значення добутку} i:=2; {початкове значення} Writeln(‘---------------------------------’); While i<=A do begin f:=f*i; {одна дія підрахунку} i:=i+1; {визначення наступного значення} End;

Writeln(‘Результат f=’,f:6:2)

Readln;

End.

 

Задача 3. Скласти программу знаходження суми 10 довільних чисел введених з клавіатури.

 

Program Summ;

Uses CRT;

Const n = 10; {розділ постійних значень}

Var I, x, S: integer;

Begin clrscr;

Writeln(‘Знаходження суми 10-ти довільних значень’);

S:= 0; {початкове значення суми}

Writeln(‘Введіть послідовно десять значень: ’);

for i:=1 to n do begin read (x); S:= S + х; end; ?

writeln (‘Результат суми S = ’, S);

readln;

End.


Поиск по сайту:



Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Студалл.Орг (0.005 сек.)