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

6. Program <Имя программы>;
Label <раздел описания меток>;
Const < раздел описания констант>;
Type < раздел описания типов>;
Var < раздел описания переменных>;
Procedure (Function) < раздел описания подпрограмм>;
Begin
<раздел операторов>
End.
7.В языке Паскаль:
<переменная>: = <выражение>
X:= Y+Z
В языке Basic:
<переменная> = <выражение>
F= 2^Z
8.В Паскале
If <логическое выражение> then <оператор1> else <оператор2>
Пример
If S:=18 then Writeln ('S=',S), else S:=S+1

В Basic
If Условие Then
Серия 1
Else
Серия 2
End If (Visual Basic)
Пример
If X < 100 Then X=X+1 Else PRINT "Bolshe sotni" End If 9. В Паскале Ввод данных с клавиатуры: read(<список ввода>); readln(<список ввода >);
Вывод данных на экран:
write(<список вывода>); writeln(<список вывода >);
Пример
Writeln('Vvedi x');
Read(x);
В Basic
Ввод данных с клавиатуры:
INPUT <Переменная>
Вывод данных на экран:
PRINT <Список вывода>
Пример
INPUT "Запиши делимое", x
INPUT "Запиши делитель", y
z=x/y
PRINT "Частное"; "равно"; z
10.For i:=1 To 20 Do Write(i/2);
11.FOR K=1 TO 60
G=I*I
PRINT I; G
NEXT I