Дані, значення яких подаються числами називаються​

1)
Var
n,m,max,min:integer;
Begin
write('Введите число: ');
readln(n);
min:=9;   
max:=0;
while n>0 do 
begin 
m:=n mod 10; 
if m<min then min:=m; 
if m>max then max:=m; 
n:=n div 10; end;   
writeln('Максимальное число: ',max);   
writeln('Минимальное число: ',min);
End.
2)
var
i,count: integer;
n,s:string;
begin
writeln('Введите число: ');
readln(s);
writeln('Введите цифру: ');
readln(n);
for i:=1 to length(s) do
if(s[i]=n)then
count:=count+1;
writeln('Количество раз, когда встречается цифра = ',count);
end.

1) Структура -
Program <имя программы>;
Var: <имена переменных> : <тип переменных>; (Раздел описания. В нём описываются имена переменных и их тип.)
Begin
...(Раздел операторов. Ввод данных, последовательность различных команд и вывод данных.)
End.
2)Оператор присваивания.
Преобразование данных, т.е. присвоение переменной нового значения.
Имеет вид: <Имя переменной>:=<арифметическое выражение>;
Например:
x:=256; (переменной 'x' присваивается значение 256)
x:=a; (переменной 'x' присваивается значение переменной 'a')
x:=x+1; (значение переменной 'x' увеличивается на единицу).
3)хм... как в математике.=)
4)Условный оператор.
Неполная форма: If <условие> then <действие>;
Полная форма: If <условие> then <действие1> else <действие2>;