четверг, 24 ноября 2011 г.

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

Program primer;
var s,p:real; n,I,j:integer;
begin
write(‘n=’);readln(n);
if n mod 2<>0 then writeln(‘некорректные данные’)
else for i:=1 to n do
if I mod 2=0 then
begin p:=1;
for j:=1 to i do
p:=p*j;
s:=s+p;
end;
writheln(‘s=’,s:5:2);
end.

Program- служебное слово, которое определяет название программы.
primer- название программы
var - раздел описании переменных
s,p,n,I,j- индификаторы переменных - это символическое имя, определенного программного объекта, представляют собой любую последовательность символов(не более 62) начинается обязательно с буквы.
real, integer - типы переменных
begin - указатель на начало программы
write(‘n=’) - оператор вывода, выводит на экран сообщение заключено в апострофы
readln(n) - оператор ввода, считывает из потока данные и запоминает их в переменную n
if <условие> then <операторы> else <операторы> - условный оператор, если значение выражения в скобках истинно то выполняется блок операторов, стоящих после служебного слова then, а если ложно то выполняется блок операторов стоящих после else, часть else может отсутствовать, т.е. является не обязательной.
mod- функция позволяющая вычислить остаток от целочисленного деления одного числа на другое в нашем случае n на 2.
for j:=1 to i do - простой цикл, в котором будет выполняться действие i раз, описанное после служебного слова do
p:=p*j; s:=s+p; - в выражениях используется оператор присваивания := , которые присвоит некоторой переменной значение выражения справа от оператора
begin p:=1;
for j:=1 to i do
p:=p*j;
s:=s+p;
end; - это блок операторов заключенных в операторные скобки begin и end
writheln(‘s=’,s:5:2);- оператор вывода, выведет на экран текстовое сообщение и значение переменной s в соответствии с указанным форматом вывода вещественного числа
end. - указатель на то что программа окончена.

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

https://docs.google.com/spreadsheet/ccc?key=0AoZ8oaywfbjFdEdHVFFudlZ4Q0haRWJEZHhSN21pQnc

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

https://docs.google.com/spreadsheet/ccc?key=0AoZ8oaywfbjFdDdrTjBKMkZMOEZsbnpfQ1Z6LV9jcHc
https://docs.google.com/spreadsheet/ccc?key=0AoZ8oaywfbjFdFE3b0VnNHQ1WUZ5TWw3dy00N2xMclE

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

1) •В любом ЯПВУ имеются следующие компоненты:
•Используемые символы (алфавит)
•Типы данных
•Структуры данных
•Семантика
2)
В языке Паскаль, например:
MOD STRING FOR THEN NOT TO BEGIN CASE CONST IF OR UNTIL
IN VAR DIV INDEX PROCEDURE DO PROGRAM WHILE DOWNTO ELSE END REPEAT
В языке Basic, например:
DIM
THEN
NEXT
REM
ELSE
WHILE
TO
R
END
GOTO
MOD
INPUT
ON
NOT
PRINT
FOR
AND
IF
3)Pascal:•Имя - это последовательность латинских букв и цифр, начинающаяся с буквы.(Mike? Elena?
Anastasia)
•В именах может использоваться символ _ подчеркивание.(Mike_Like? Rest_1? Li_Chan)
•Не разрешается использовать в качестве имен служебные слова и имена, которыми названы стандартные константы, типы, процедуры, функции и файлы.(Integer? real? var)
Basic:
•Идентификаторы могут содержать латинские буквы, цифры и некоторые символы и должны начинаться с буквы. (Mike? Elena? Anastasia)
•В конце идентификатора может быть суффикс – символ «$» или «%».(Money $? $$$? 100%)
•Не разрешается использовать в качестве имен служебные слова.(Integer? real? short)
4) Тип определяет:
- возможные значения переменных, констант, функций, выражений, принадлежащих к данному типу;
- внутреннюю форму представления данных в ЭВМ;
- операции и функции, которые могут выполняться над величинами, принадлежащими к данному типу.
5)Pascal: const
n = 5;
type
mas = array[1..n] of integer;
var
a: mas;
i: byte;
begin
writeln('введите элементы массива');
for i:=1 to n do readln(a[i]);
writeln('вывод элементов массива:');
for i:=1 to n do write(a[i]:5);
end.
Basic: Dim kindergarten As Integer = students(0)
Dim firstGrade As Integer = students(1)
Dim sixthGrade As Integer = students(6)
MsgBox("Students in kindergarten = " & CStr(kindergarten))
MsgBox("Students in first grade = " & CStr(firstGrade))
MsgBox("Students in sixth grade = " & CStr(sixthGrade))
6)Программа на языке Паскаль состоит из заголовка, разделов описаний и раздела операторов. Заголовок программы содержит имя программы, например:
Program PRIM;
Описания могут включать в себя:
раздел подключаемых библиотек (модулей);
раздел описания меток;
раздел описания констант;
раздел описания типов;
раздел описания переменных;
раздел описания процедур и функций.
Раздел описания модулей определяется служебным словом USES и содержит имена подключаемых модулей (библиотек) как входящих в состав системы Turbo Pascal, так и написанных пользователем. Раздел описания модулей должен быть первым среди разделов описаний. Имена модулей отделяются друг от друга запятыми:
uses CRT, Graph;
Любой оператор в программе может быть помечен меткой. Имя метки задается по правилам образования идентификаторов Турбо Паскаль. В качестве метки также могут использоваться произвольные целые числа без знака, содержащие не более четырех цифр. Метка ставится перед оператором и отделяется от него двоеточием. Все метки, используемые в программе, должны быть перечислены в разделе описания меток, например:
label 3, 471, 29, Quit;
Описание констант позволяет использовать имена как синонимы констант, их необходимо определить в разделе описания констант:
const K= 1024; MAX= 16384;
В разделе описания переменных необходимо указать все переменные, используемые в программе, и определить их тип:
var P,Q,R: Integer;
A,B: Char;
F1,F2: Boolean;
Описание типов, процедур и функций будет рассмотрено ниже. Отдельные разделы описаний могут отсутствовать, но следует помнить, что в Паскаль - программе должны быть обязательно описаны все компоненты программы.
Раздел операторов представляет собой составной оператор, который содержит между служебными словами
begin.......end
последовательность операторов. Операторы отделяются друг от друга символом ;. Текст программы заканчивается символом точка.
Кроме описаний и операторов Паскаль - программа может содержать комментарии, которые представляют собой произвольную последовательность символов, расположенную между открывающей скобкой комментариев { и закрывающей скобкой комментариев }.
7)•В языке Паскаль:
•<переменная>: = <выражение>
Например, V:=A; или V:=A+1;
В языке Basic:
<переменная> = <выражение>
v = 42
8)•В ЯП Паскаль
•If <логическое выражение> then <оператор1> else <оператор2>;
If условие
then
begin
операторы;
end
else
begin
операторы;
end;
•В ЯП Basic
•If Условие Then
Серия 1
Else
Серия 2
End If (Visual Basic)
CLS INPUT "А=",А
INPUT "В=",В
IF А <> В THEN
IF А > В THEN
А=А-В
ELSE
В=В-А
END IF
GOTO metka
END IF
PRINT "НОД=",А
9)•В ЯП Паскаль
•Ввод данных с клавиатуры:
•read(<список ввода>); readln(<список ввода >);
•Вывод данных на экран:
•write(<список вывода>); writeln(<список вывода >);
•В ЯП Basic
•Ввод данных с клавиатуры:
•INPUT <Переменная>
•Вывод данных на экран:
•PRINT <Список вывода>
10)Цикл с параметром
•For i:= N1 To N2 Do <оператор>;
•либо
For i:= N1 DownTo N2 Do <оператор>;
Цикл с предусловием
•While <логическое выражение> Dо <тело цикла>;
•Цикл с постусловием
•Repeat <тело цикла> until<логическое выражение>;
for i := 1 to ListSize do
begin
readln (Number):
S := S +Number;
end;
11)CONST PI=3.1415
FOR I=1 TO 45
X=PI*I/180
Y1=SIN(X)
Y2=COS(X)
Y3=TAN(X)
PRINT I, “Sin=”;Y1, “Cos=”; Y2, “tg=”; Y3
NEXT I

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

Тест был сложным, я его решила только с третьего раза.