четверг, 27 октября 2011 г.

3 задание 3 модуль (2)

4) В любом алгоритмическом языке каждая константа, переменная, выражение или функция бывают определенного типа. Тип определяет:

- возможные значения переменных, констант, функций, выражений, принадлежащих к данному типу;

- внутреннюю форму представления данных в ЭВМ;

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

5)Паскаль:
Для того чтобы ввести значения элементов массива, необходимо последовательно изменять значение индекса, начиная с первого до последнего, и вводить соответствующий элемент. Для реализации этих действий удобно использовать цикл с заданным числом повторений, т.е. простой арифметический цикл, где параметром цикла будет выступать переменная – индекс массива Паскаля. Значения элементов могут быть введены с клавиатуры или определены с помощью оператора присваивания.
Var
A : array [1..10] of integer ;
I : byte ; {переменная I вводится как индекс массива}
Begin
For i:=1 to 10 do
Readln (a[i]); { ввод i- го элемента производится с клавиатуры }
Бейсик:
Массив представляет собой набор значений, логически связанных друг с другом
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 <Имя программы>;
Label <раздел описания меток>;
Const < раздел описания констант>;
Type < раздел описания типов>;
Var < раздел описания переменных>;
Procedure (Function) < раздел описания подпрограмм>;
Begin<раздел операторов>
End.

7)Оператор присваивания заменяет текущее значение переменной. новым значением, которое определяется выражением, или определяет. выражение, значение которого должно возвращаться функцией.
В Паскале знак присваивания выглядит как :=. Оператор присваивания записывается в соответствии с общим правилом: Х:=А, где X — идентификатор переменной, А — выражение.
<переменная>: = <выражение>
Например, V:=A; или V:=A+1
В Basic операторы присваивания выполняют присваивание, сводящееся к вычислению значения справа от оператора присваивания (=) и его записи в элемент слева.
<переменная> = <выражение>
Например, v = 42.   В этом примере оператор присваивания сохраняет значение литерала 42 в переменной v.

8)   1) В языке Паскаль имеется оператор ветвления. Другое его название - условный оператор. Формат полного оператора ветвления следующий:
if <логическое выражение> then <оператор1>
else <оператор2>
Здесь if - "если", then - "то", else - "иначе".

Пример: Program BID1;
var А, В, С : real;
begin readln(А, В);
if A>B
then C:=A
else C:=B;
writeln(С)
end.
    2)   В программе на Бейсике оператор ветвления может записываться в одну строку или в несколько строк.
Например: Алгоритм Евклида нахождения наибольшего общего делителя (НОД)
CLS INPUT "А=",А
INPUT "В=",В
IF А <> В THEN
IF А > В THEN
А=А-В
ELSE
В=В-А
END IF
GOTO metka
END IF
PRINT "НОД=",А

9)Операторы ввода
Бейсик                                           Паскаль
INPUT <Переменная>                   Read(<Список ввода>);<br />
                                                        Readln(<Список ввода>);
Операторы вывода
Бейсик                                           Паскаль  
PRINT <Список вывода>               Write(<Список вывода>);
                                                         Writeln(<Список вывода>);

Паскаль: Пример:
VAR i : Integer;
w : Word;
r : Real;
BEGIN
WRITELN;
{------------- ввод -------------}
WRITE('Введите целое число ');
READ(i);
WRITELN;
WRITE('Введите натуральное число ');
READ(w);
WRITELN;
WRITE('Введите вещественное число ');
READ(r);
WRITELN;
{------------- вывод -------------}
WRITELN('Вы ввели : ',i,' ',w,' ',r,' их сумма=',i+w+r);
WRITELN('Нажмите Enter для выхода');
READLN;
END.

Basic Пример:
DIM F2 (4,4)
P= .5
FOR I=1 TO4
FOR J=1 TO 4
P=P+1
F2 (I, J)=P
PRINT USING ''###.##"; F2 (I, J);
NEXT J
PRINT
NEXT I
END

10)Оператор цикла применяется при выполнении расчетов или других действий, повторяющихся определенное количество раз. Оператор имеет вид:
For i:= N1 To N2 Do "оператор";
либо
For i:= N1 DownTo N2 Do "оператор";
Здесь i - параметр цикла (переменная порядкового типа),
N1, N2 - начальное и конечное значения параметра цикла i.
N1, N2 могут быть константами, переменными или выражениями порядкового типа.

Пример: PROGRAM SUM_K; { расчет конечной суммы }
var
a, S, Sn, i, N : word;
Begin
write('Введите число членов суммы N=');
readln(N);
S:= 0;
For i:= 1 to N do
begin { цикл суммирования }
a := Sqr(2*i-1);
S:= S+a
end;
Sn := N*(4*N*N-1) div 3;
Writeln('Конечная сумма S=', S:10:2);
Writeln('Расчет конечной суммы по формуле Sn=', Sn:10:2);
Writeln('Нажми Enter');
ReadLn
End.

11)Оператор For... Next (Visual Basic)
Повторяет группу операторов заданное количество раз.

Пример:
For counter [ As datatype ] = start To end [ Step step ]
[ statements ]
[ Continue For ]
[ statements ]
[ Exit For ]
[ statements ]
Next [ counter ]

1 комментарий: