Тема: Запуск програми та виконання. Створення та реалізація найпростіших циклічних програм
Мета: навчити учнів вводити програми, запускати на виконання та виправляти помилки. Переглядати результат
Обладнання: комп’ютер, опорний конспект
Терміни і поняття до ЛПР №23: мова програмування Паскаль, turbo.exe, транслювання, Alt+F5, Ctrl+F9, program, var, integer, real, begin, writeln, end
Хід роботи
Задача.. Скласти програму обчислення значення функції Y:= (a+b-c)/(a-b) при а:=10 в:=15; с:=7.
Program Fun1;
Var
y: real;a, b, c: integer;
Begin
write ('Введіть значення a=');
readln (a);
write ('Введіть значення b=');
readln (b);
write ('Введіть значення c=');
readln (c);
Y:=(a+b-c)/(a-b);
writeln ('Значення функції Y=',Y)
end.
2. Запустіть програму середовища мови програмування Паскаль, клацнувши на відповідній піктограмі, чи виконавши команду turbo.exe.
3. Відкрийте нове вікно (F10, File, New).
4. Введіть текст програми. Символи «:», «;» є на клавіші з літерою «ж», а
«'» — з літерою «є». Поставте крапку в кінці тексту.
5. Виправте очевидні помилки.
6. Командою Run запустіть програму на виконання.
|
|
Відбудеться транслювання тексту програми i виконання, якщо в тексті не буде помилок.
7. Якщо є помилки, то виправте їх.
8. Щоб побачити результати роботи програми, відкрийте вікно з
результатами (Alt+F5 ). Перепишіть результати у зошит.
9. Щоб повернутися у вікно програми, натисніть на будь-яку клавішу.
10. Змініть вхідні дані програми так: а:=6 в:=14; с:=4.
11. Запустіть програму на виконання ще раз, застосувавши другий спосіб
— (Ctrl+F9 ). Перепишіть результати з екрану в зошит.
12. Збережіть програму на диску чи дискеті з назвою Fun 1.pas.
13. Вийдіть з середовища програмування ( F10 або File _ Exit ).
14. Складіть програму обчислення значення функції:
15. Введіть дану програму та знайдіть значення функції при a =3, b=4.5, c=7
Program Fun2;
Var
y: real;a, b, c: real;
Begin
write ('Введіть значення a=');
readln (a);
write ('Введіть значення b=');
readln (b);
write ('Введіть значення c=');
readln (c);
Y:=(a*b)+(sqr(a)-cos(c))/sqrt(sqr(a)+1);
writeln ('Значення функції Y=',Y)
end.
16. Збережіть програму на диску чи дискеті з назвою Fun 2.pas.
17. Складіть програму обчислення значення функцій по варіантах (додаткові завдання).
№ з/п | Розрахункова формула (в програму формули вводити за правилами) | Значення змінних |
а:=6.2, в:=1.4; с:=4 | ||
а:=2.1, в:= 4.1; с:=3 | ||
а:=4, в:=7; с:=5 | ||
а:=1, в:=4; с:=4 | ||
а:=3.2, в:=5.3; с:=4 |