Модуль 3 задание 3

1. В состав любого ЯПВУ входит:
-используемые символы (алфавит)
-типы данных
-структуры данных
-семантика

2. Зарезервированные слова - это слова которые программистам нельзя использовать в качестве своих идентификаторов, предназначены для обозначения операторов, встроенных функций и т. п.
в языке Pascal: MOD STRING FOR THEN NOT и др.
в языке Basic: DIM THEN NEXT REM ELSE и др.

3. В ЯП Pascal:
Имя - это последовательность латинских букв и цифр, начинающаяся с буквы. В именах может использоваться символ _ подчеркивание. Не разрешается использовать в качестве имен служебные слова и имена, которыми названы стандартные константы, типы, процедуры, функции и файлы.
В ЯП Basic:
Идентификаторы могут содержать латинские буквы, цифры и некоторые символы и должны начинаться с буквы. В конце идентификатора может быть суффикс – символ «$» или «%».
Не разрешается использовать в качестве имен служебные слова.

4. Тип данных определяет:
- возможные значения переменных, констант, функций, выражений, принадлежащих к данному типу;
- внутреннюю форму представления данных в ЭВМ;
- операции и функции, которые могут выполняться над величинами, принадлежащими к данному типу.

5. Pascal:
Var
<имя массива> : array[<тип индекса>] of <базовый тип>;
Basic:
Dim
имя_массива(N-1) As Тип элементов массива

6. Структура программы на ЯП Паскаль:
Program <Имя программы>;
Label <раздел описания меток>;
Const < раздел описания констант>;
Type < раздел описания типов>;
Var < раздел описания переменных>;
Procedure (Function) < раздел описания подпрограмм>;
Begin
<раздел операторов>
End.
7. Операторы присваивания.
В языке Паскаль:
<переменная>: = <выражение>
пример:
X:=(Y+Z)/(2+Z*10-1/3)

В языке Basic:
<переменная> = <выражение>
пример:
L=8
P=P+1

8. Оператор ветвления.
В ЯП Паскаль
If <логическое выражение> then <оператор1> else <оператор2>;

Пример: Из трех данных вещественных чисел X, Y, Z выбрать наибольшее.
Решение: Используем алгоритм с выложенными полными ветвлениями.
Program max3_1;
Var X, Y, Z, MAX: real;
Begin
write(‘Введите X, Y, Z ’); readln(X, Y, Z);
if X > =Y
then if X > = Z then MAX : =X else MAX : =Z
else if Y > = Z then MAX : =Y else MAX : =Z;
writeln(‘Максимальное значение’, MAX)
end.

В ЯП Basic
If Условие Then
Серия 1
Else
Серия 2
End If (Visual Basic)

Пример: Составить программу для вычисления площади круга или площади квадрата в зависимости от введенного признака.
Программа:
INPUT X, M
IF M<0 THEN
S=X*X
PRINT"ПЛОШАДЬ КВАДРАТА";S
ELSE
S=PI*X*X
PRINT "ПЛОЩАДЬ КРУГА";S
END FI
END

9. Операторы ввода-вывода.
Паскаль:
Program Car;
Var V, V1, T, S, S1, S2: Real;
Begin
Write(‘введите скорости автомобилей, расстояние между ними и время движения:’);
ReadLn(V, V1, S, T);
S1: = S + (V + V1) * T;
S2: = abs((V + V1)*T – S);
WriteLn(‘Расстояние будет равно’, S1:7:4, ‘км или’, S2:7:4,’км’);
End.

Basic:
Программа:
INPUT X, M
IF M<0 THEN
S=X*X
PRINT"ПЛОШАДЬ КВАДРАТА";S
ELSE
S=PI*X*X
PRINT "ПЛОЩАДЬ КРУГА";S
END FI
END

10. Пример цикла на Паскаль:
Program Natur;
var a, Summa, N: integer;
begin
write(‘N=’); readln(N);
{Цикл с предусловием}
a: = 1; Summa: = 0;
while a < = N do
begin
Summa: = Summa + a;
a: = a + 1
end;

11. Пример цикла с параметром на Basic:
Составить программу для вычисления квадратов четных чисел от 2 до 10.
Программа
FOR J=2 ТО 10 SТЕР 2
PRINT J, J*J
NEXT J
END