Применение логических операций с оператором IF.

В данном уроке мы рассмотрим применение логической операции And с условным оператором If.

Перевод числа из десятичной системы счисления в шестнадцатеричную.

Напишем программу, которая вводит с клавиатуры целое число в диапазоне от 0 до 15 и преобразует его к шестнадцатеричной системе счисления. Напомню, что в шестнадцатеричной системе счисления числа в диапазоне от 0 до 9 соответствуют таким же числам в ...

Строки в Паскаль.

Тип данных String (строковый тип) используется в Паскаль для обработки текстов. Если в одну переменную типа Char можно записать лишь один символ, то в переменную типа String можно записать до 255 символов.

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

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

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

Тип данных Integer.

Тип INTEGER (целый). Этот тип представляет множество целых чисел диапазона от -32768 до 32767. В памяти ЭВМ  под целое число отводится два байта (16 бит).

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

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


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);
 
 
+3 # LemonLite 26.04.2015 08:55
Ну я не знаю..... этот сайт ЛУЧШИЙ просто ЛУЧШИЙ я освоил здесь этот pascal просто благодарен тому кто решил создать такой сайт и научить людей как работать в pascal! Спасибо тебе кто бы ты там не был!!!
 
   ГлавнаяПаскальМассивы в ПаскальПодсчет количества четных элементов в массиве.