1. Горизонтальной линейки
2.обычный-полужирный курсив-полужирный-курсив
3.второй символ
4.форматирование
5. 9 строк 8 столбцов
Var
m,n,t:integer;
begin
Write('Введите два натуральных числа: '); Read(m,n);
t:=m; m:=n; n:=t;
Writeln('Результат обмена: ',m,', ',n)
end.
<em><u>Тестовое решение:</u></em>
Введите два натуральных числа: 35 -20
Результат обмена: -20, 35
<span>1.графический - с помощью спец. рисунков или значков;2.числовой - с помощью чисел;3.символьный - с помощью символов того же алфавита, что и исходный текст.</span>
2018
2 - 11111100010,
8 - 3742,
16 - 7е2.
2012
2 - 11111011100,
8 - 3734,
16 - 7dc.
Function f(x:integer):integer;
begin
if abs(x+1)<=1 then f:=4
else f:=-2*sqr(x)+sqr(f(x-1))
end;