Тестирование готовой программы на языке Pascal
Теоретическая часть
Условный оператор IF обеспечивает выполнение или невыполнение некоторого оператора в зависимости от заданных условий. К ним относятся операторы IF и CASE. Формат для IF:
ЕСЛИ (условие = ИСТИНА) ТО ВЫПОЛНИТЬ <оператор1> ИНАЧЕ ВЫПОЛНИТЬ <оператор2>;
То же на языке Паскаль:
IF (условие = ИСТИНА) THEN (оператор 1) ELSE (оператор2);
Обратите внимание: перед ELSE точка с запятой не ставится!!!
Пример:
IF Temp>100 THEN Writeln(’Вызывайте пожарных! ’) ELSE Writeln(’Bce в порядке’);
В операторе IF вторая часть может отсутствовать:
IF (условие = ИСТИНА) THEN (оператор1);
В этом случае, если условие ложно, оператор IF игнорируется и выполняется следующий за IF оператор. Такой оператор называется неполным.
Оператор IF используется в тех случаях, когда имеется два варианта действий в зависимости от какого-то условия.
Ход работы
Запустить программу PascalABC.
Набрать программу из примера и запустить ее на выполнение командой
Программа-Выполнить или нажатием на клавиши F9.
Пример: Вывести на экран большее из двух данных чисел.
Составим алгоритм решения задачи:
1Начало.
2Ввод чисел х и у.
3Если х>у, то выполнить вывод (х), иначе - вывод (у).
4Конец.
Программа:
Program Primer 1;
Var х, у: Integer;
Begin
writeln ('Введите два числа через пробел*);
readln(x,y); { вводим два целых числа через пробел }
if х>у then writeln(x) { если (If) х больше у, то (then) выводим х }
else writeln(y); { иначе (else) выводим у }
End
Решите самостоятельно задачу, составив алгоритм и программу:
1) Вывести на экран номер четверти, которой принадлежит точка с координатами (х, у), при условии, что х и у отличны от 0.
