Тип данных Char. Функции Ord, Chr.

Мы с Вами уже рассмотрели типы данных, которые позволяют хранить и обрабатывать целые числа (integer) и дробные числа (real). Теперь рассмотрим тип данных, позволяющий хранить и обрабатывать различные символы. Символы – это все буквы и значки, ...

Ввод символов с клавиатуры.

Ввод символов с клавиатуры почти не отличается от ввода чисел с клавиатуры. Для того чтобы ввести какие-то символы (буквы, знаки и т.д.) с клавиатуры необходимо для переменных использовать символьный тип данных Char.

Использование вложенного оператора If.

Условные операторы в Pascal можно вкладывать друг в друга. Для этого используется вложенный оператор IF. Рассмотрим это на примере программы, которая будет считать количество корней квадратного уравнения.

Циклы и массивы

Оператор варианта CASE.

Иногда его называют также оператором выбора. Это оператор CASE, который является обобщением оператора IF и позволяет сделать выбор из произвольного числа имеющихся вариантов.

Программирование данных.

Любые данные, то есть константы, переменные, выражения, значения функций, характеризуются своими типами. Тип определяет множество допустимых значений, которые может иметь программируемый объект, ...

Напишем программу, в которой будем вводить с клавиатуры различные числа и выводить их на экран с противоположным знаком.

 Использование массивов (продолжение).


program massiv3;
uses crt;
const N=10;
type X=array [1..N] of integer;
var LINE:X;
I:integer;
begin
clrscr;
for I:=1 to N do
begin
write (‘Введите ’,I, ‘ число ’);
readln (LINE[I]);
end;
for I:=1 to N do
write (-LINE[I]:5);
writeln;
readln
end.

В строке №3 объявляем раздел описания констант Const. Записываем константу «N» и присваиваем ей значение 10. Это значение не будет меняться по ходу выполнения программы.

В строке №4 объявляем массив. Для объявления массива мы использовали новый раздел Type. Это раздел для описания типов переменных. Эти типы определяет сам пользователь. Здесь мы объявляем массив из целых чисел.  [1..N] – это диапазон чисел, причем N заранее определен в разделе констант Const и равен 10. Если бы мы объявляли массив старым способом, то у нас получилась бы такая строка: var LINE:array [1..N] of integer. В нашем примере мы записываем так: type X=array [1..N] of integer. А далее, в строке №5, мы записываем переменную LINE и указываем для нее тип данных X. Получается, что для переменной мы указываем тип данных, который описали в строке №4 в разделе Type. Можно объявлять массивы любым способом: и в разделе описания переменных Var, и в разделе описания типов переменных Type. Однако, с точки зрения грамотного стиля составления программы, второй вариант более предпочтителен.

В строке №6 записываем переменную «I», которая будет являтся счетчиком для цикла.

Строка №9. Записываем цикл. Следует помнить, что после записи for I:=1 to N do у нас следуют операторы, которые необходимо заключать в отдельный блок begin…end. В нашей программе 2 оператора (строка №11 и №12) заключены в отдельный блок, поэтому цикл for I:=1 to N будет выполняться для обоих этих операторов (10 раз будет выводиться сообщение на экран и 10 раз будем вводить число с клавиатуры).

В строке №14 задаем новый цикл for I:=1 to N do для оператора write (-LINE[I]:5). Таким образом, мы выводим на экран значения всех элементов массива. (элементы массива содержат значения, которые мы ввели с клавиатуры). Так как нам необходимо вывести эти значения на экран с противоположным знаком, перед LINE[I] ставиться знак «-» . Кроме того, указываем формат вывода для каждого числа (:5). В результате, при выводе на экран, под каждое число будет выделено 5 знакомест.

massivih v paskalj....

Запускаем программу и вводим 10 различных чисел, как отрицательных, так и положительных

massivih v paskalj.....

Мы видим, что положительное число вывелось в нижней строке отрицательным, а отрицательное – положительным.


Предыдущая статья : Использование массивов.

Оглавление : Уроки Паскаль. Массивы.

Следующая статья : Randomize и Random в Pascal.


Комментарии  

 
0 # буга 29.11.2012 13:59
readln(a);
a:=a-2*a;
writeln(a);
Ответить
 
 
+6 # LemonLite 26.04.2015 08:55
Ну я не знаю..... этот сайт ЛУЧШИЙ просто ЛУЧШИЙ я освоил здесь этот pascal просто благодарен тому кто решил создать такой сайт и научить людей как работать в pascal! Спасибо тебе кто бы ты там не был!!!
Ответить
 

Добавить комментарий

Защитный код
Обновить

   ГлавнаяПаскальМассивы в Паскаль