//PascalABC
var
N : integer;
begin
write('Введите число > ');
readln(N);
write('Получите модуль числа > ', abs(N));
end.
VBA:
Sub P()
Dim x As Double, y As Double
x = Val(InputBox("x = "))
If x <= 0 Then
y = Sin(2 * x)
ElseIf x <= 10 Then
y = Tan(x)
Else: y = 0.33 * x
End If
MsgBox (" Y = " & y)
End Sub
#include
int main()
{
int i;
cin >> i;
if(i<3 || i==12)
cout << “winter”;
else if(i <6)
cout << “spring”;
else if(i<9)
cout << “summer”;
else
cout << “autumn”;
return 0;
}
1. select * from Название_таблицы order by Поле_с_датой
2. select * from <span>Название_таблицы where Имя_автора <> 'Беляев А.Р.' order by автор, год
3. delete from </span><span>Название_таблицы where номер_полки=5 and год<'01-01-1990'</span>