Программирование линейных алгоритмов

Линейные программы могут включать в себя операторы присваивания, ввода-вывода, обращения к процедурам.

Оператор присваивания

A:=B;

А – переменная;

В – выражение;

Типы переменной А и значение переменной В должны соответствовать друг другу.

Если переменная А - целого типа, то выражение В тоже должно иметь значение целого типа.

Задачи.

1.Какие из следующих последовательностей символов являются операторами присваивания?

а)X:=Y; б)Min=K+1; в)Summa+1:=W; г)S:=S; д)A:=’****’; е)Rrr=125+1*A ж)Str:=’120*Y’; з)T:=5>Y;

2.Пусть значения переменных Х и У равны, соответственно, 3 и –2, какие значения будут иметь эти переменные после выполнения операторов присваивания?

а) X:=X+2*Y; Y:=Y/2;

в) Y:=-Y; X:=X+Y; Y:=Y+1;

г) X:=1; X:=X+Y;

д) X:=Y; Y:=X;

Операторы ввода-вывода

В общем случае ввод и вывод значений происходит из файлов привязанных к программе. Ввод с клавиатуры и вывод на экран рассматривается в Паскале, как обмен информацией между программой и стандартными файлами с именами Input (клавиатура) и Output (экран), поэтому при вводе с клавиатуры значений и выводе результатов на экран имена этих файлов не указываются.

Оператор вывода

Оператор вывода на экран имеет 3 модификации:

Write(B1,B2,…,Bn);- где

B1,B2,…,Bn – выражения типов: Integer, Char, Real, String, Boolean.

При выполнении оператора значения выражений вычисляются и выводятся в одну строку экрана.

Значения типа Integer - выводятся в обычной форме в виде целого числа.

Значения типа Real – в простейшем случае выводятся в форме с порядком, при этом мантисса содержит 7 цифр.

Пример:

Write(123.456); на экране – 1.234560Е02

Write(-0.000123); на экране – - 1.230000Е-04

Для удобства восприятия вывода существует возможность задания маски. Она задается в следующем виде:

Write(A:N:M);

N – целая константа, обозначающая общее число позиций, отводимых под значение A

М – целая константа, обозначающая число позиций, отводимых под дробную часть.

Пример:

Write(123.456:10:4);

.

Write(123.456:6:2);

.

Значения типа Char и String выводятся в виде одного или последовательности символов.

Значения типа Boolean выводятся в виде True или False.

При выводе нескольких значений в одну строку возникает потребность отделять их друг от друга с помощью заданного числа пробелов. Для этого можно использовать элемент списка вывода вида - ’ ’:K – где

К – коэффициент повторения количества необходимых пробелов

Пример:

Write(’X1=’,X1:8:3,’ ’:10,’X2=’,X2:8:3);

Writeln(B1,B2,…,Bn);

Отличается от первого тем, что после вывода последнего значения курсор переводится в начало следующей строки экрана.

Writeln;

Выводит пустую строку.

Задача 1.

Вывести на экран фразу – «Моя первая программа»

Решение:

Program Lin1;

Begin

Writeln(’Моя первая программа’);

End.

Задачи:

1.Какие из следующих последовательностей символов являются операторами вывода:

а) Write(X,Y); б)Writeln(X:Y:Z); в)Writeln г) Write(’Xx’,Xx,’Yy’,Yy); д)Writeln(1+2,3+4,Y/X); е) Writeln(’1+2’,’3+4’,’Y/X’); ж)Writeln(X:=Y,Z);

2.Создать на экране рисунок (использовать любые символы).

Оператор ввода

Оператор ввода значений с клавиатуры имеет вид:

Read(A1,A2,…,An); - где

A1, A2,…,An – имена переменных.

Следует иметь в виду, что вводимые значения не могут быть логическими.

При выполнении этого оператора компилятор приостанавливает свою работу, программист должен набрать значения переменных перечисляемых в списке ввода, учитывая следующие особенности:

- при вводе значений символьных переменных каждый очередной введенный символ становится значением очередной переменной;

- числовые значения должны разделяться пробелами или нажатием клавиши ввода;

- при вводе значений строковых переменных последний вводимый символ полностью включается в значение строковой переменной, поэтому невозможно в одном операторе ввести значение двух строковых переменных так, как нет символа разделяющего одно значение от другого.

-

Readln(B1,B2,…,Bn);

Отличается от первого тем, что после ввода последнего значения курсор переводится в начало следующей строки экрана.

Readln;

Ждет нажатия клавиши ввода.

Задача 2.

Составить программу – «Диалог с компьютером»

Решение:

Program Lin2;

Var A:String;

Begin

Writeln(’Я компьютер, а как зовут тебя?’);

Readln(A);

Writeln(’Очень приятно, ’,A );

End.

Задача 3.

Даны числа A,B,C. Переприсвоить их значения следующим образом: A B C

Исходные данные:

A=10, B=15, C=20

Pезультат:

A=20, B=10, C=15

Решение:

Program Lin3;

Var A,B,C,D:Integer;

Begin

Writeln(’Введите значения переменных A, B, C’);

Read(A,B,C);

D:=C;

C:=B;

B:=A;

A:=D;

Writeln(’A=’,A,’B=’,B,’C=’,C);

End.

Задачи:

1. Какие из следующих последовательностей символов являются операторами

ввода:

а) Write(X,Y); б) Readln(X+Y,Y); в)Read(X,Y); г)Read(’Xx’,Xx,’Yy’,Yy)?

2. Даны числа A,B,C,D. Переприсвоить их значения следующим образом:

A B C D (составить программу).

3. Какие числа будут выведены в результате выполнения последовательности

операторов:

Read(X); X:=X Mod 2; X:=Sqrt(X+1); Write(X,X*2); если в качестве исходного

данного использовалось число:

а) 2; б)1.2; в)6; г)5.4?

4. Вычислить расстояние между двумя точками с данными координатами X1,Y1 и X2,Y2.

5. На предприятии 2-м рабочим выделена премия (N руб). Разделить эту премию между рабочими в зависимости от стажа их работы на предприятии (прямо пропорциональная зависимость). Стаж вводится с клавиатуры.

6. По стороне основания и боковому ребру определить полную площадь поверхности правильной призмы:

а) треугольной; б) четырехугольной; в)шестиугольной.

7. Продолжить программу –«Диалог с компьютером».

8. Дано целое число А. Не используя никаких функций и никаких операций кроме умножения получить:

а) А⁸ за три операции; б) А¹⁰ за четыре операции; в) А⁷ за четыре операции;

9. Дано число Х. Вычислить выражение 2х⁴-3х³+4х²-5х+6.Позаботиться об

экономии операций.