|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
VI. Тестирование программы: 1. Запустите программу.
2. Поэкспериментируйте с программой вводя различные значения. 3. Вместо условия a mod 3=0 напишите условие int(a/3)=a/3. Придумайте свои условия и проверьте их правильность.
Пример 2. Дано число. Дать характеристику числа:
Этапы выполнения задания. I. Определение исходных данных: переменная а. II. Определение результатов: характеристика числа. III. Алгоритм решения задачи. 1. Ввод исходных данных 2. Проверка условия a<0, если условие выполняется, то k:='отрицательное', иначе k:=' положительное'. Проверка условия a=int(a), если условие выполняется, то m:=' целое', иначе m:='не целое'. Проверка условия a/2=int(a/2), если условие выполняется, то p:=' чётное', иначе p:=' нечётное '. 3. Вывод результата. IV. Описание переменных: Переменная a типа real, переменные k,m,p имеют тип string. V. Программа:
program zadacha_2; var a:real; k,m,p:string; Begin writeln('Введите число'); readln(a); if a<0 then k:='отрицательное' else k:=' положительное'; if a=int(a) then m:=' целое' else m:='не целое'; if a/2=int(a/2) then p:=' чётное' else p:=' нечётное '; writeln('число ',a,' - ',k,' ; ',m,' ; ',p); End.
VI. Тестирование программы: 1. Запустите программу и введите значение: а=9. Проверьте, результат должен быть следующим: число 9 - положительное ; целое ; нечётное 2. Поэкспериментируйте с программой вводя различные значения.
Пример 3. Дано три числа x, y, z. Вычислить сумму только положительных чисел из трех данных. Этапы выполнения задания. I. Определение исходных данных: переменные x, y, z. II. Определение результатов: сумма. III. Алгоритм решения задачи. 1. Ввод исходных данных 2. Проверка условия x>0, если условие выполняется, то sum:=sum+x. Аналогично проверяются условия с y и z. 3. Вывод результата. IV. Описание переменных: Все переменные, определенные для решения задачи, имеют тип real. V. Программа:
program zadacha_6; var x,y,z,sum:real; Begin writeln('Введите три числа'); readln(x,y,z); sum:=0; if x>0 then sum:=sum+x; if y>0 then sum:=sum+y; if z>0 then sum:=sum+z; writeln('сумма положительных чисел = ',sum); End.
VI. Тестирование программы: 1. Запустите программу и введите значение: x=2,y=-4,z=9. Проверьте, результат должен быть следующим: сумма положительных чисел = 11 2. Поэкспериментируйте с программой вводя различные значения. Проверка знанийТест: Алгоритмы с ветвлениями 1Тест: Алгоритмы с ветвлениями 2Задачи для самостоятельного решения
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Copyright © 2008 СОШ №2 им. Н.П. Массонова г.Свислочь © Синица А.А. |