Понравилась статья? Поделись в соц. сетях
Pos находит под каким номером стоит нужный ему символ(из списка). Смотрите
Имя переменной=pos(символ,список);
Чтобы паскаль мог проверять является символ из списка, понадобится оператор Pos
Spisok: string= гласные буквы ;
Помощь: Для начала вам нужно в разделе const создать список ваших гласных примерно так.
Домашнее задание: Написать функцию, которая возвращает значение TRUE, если символ полученной функцией в качестве аргумента, является гласной буквой русского алфавита.
Основная программа выглядела бы так
И мы бы уже присваивали значения 0, 1, 2 НЕ к urav, и присваивали бы к переменной kvurav.
Procedure urav(var a,b,c:real; var x1,x2:real; var kvurav:integer);
Если бы мы писали с помощью процедуры, нам бы пришлось Pвводить новую переменную.
Далее в подпрограмме запускаются операторы выбора if, а в основной программе case. Тут должно быть все понятно. Если нет то изучите Pи
Переменные a,b,c,x1,x2 – нужны и в главной программе, и в подпрограмме, а переменная d нужна только в подпрограмме.
Обратите внимание : Мы вводим переменные a,b,c через readln и не вводим корни уравнения x1,x2, но мы будем с ними работать в основной программе:Pпри выводе корней, поэтому мы их вводим в формальные переменные подпрограммы, когда переменная дискриминант d нужна только в подпрограмме.
Понятное дело, что коэффициенты мы будем вводить сами.
a,b,c коэффициенты уравнения. x1,x2 корни уравнения.
Пример задачи: Написать функцию для решения квадратного уравнения. Значение функции должно возвращать основной программе кол-во корней: 2- уравнение имеет два корня, 1 один корень, 0 ноль корней.
Чем функция отличается от процедуры, и что такое формальные переменные и фактические мы уже знаем. Если нет, перейдите на предыдущий урок.
На этом уроке мы более подробно рассмотрим вид подпрограммы функция. И разберем еще одну задачу с функцией.
Урок 15. Функции Pascal | Dinaf.ru
Комментариев нет:
Отправить комментарий