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 ]
- возможные значения переменных, констант, функций, выражений, принадлежащих к данному типу;
- внутреннюю форму представления данных в ЭВМ;
- операции и функции, которые могут выполняться над величинами, принадлежащими к данному типу.
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
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 ]
Все верно, задание зачтено.
ОтветитьУдалить