1)Ниже записана программа. Получив на вход число x, эта программа печатает два числа. Укажите наименьшее из таких чисел x, при вводе которых алгоритм печатает сначала 3, а потом 7.
var x, L, M: integer;
begin
readln(x);
L:=0; M:=0;
while x > 0 do begin
L:= L + 1;
M:= M + x mod 10;
x:= x div 10;
end;
writeln(L); write(M);
end.
2)Ниже записана программа. Получив на вход число x, эта программа печатает два числа. Укажите наименьшее из таких чисел x, при вводе которых алгоритм печатает сначала 3, а потом 36.
var x, a, b : integer;
begin
readln(x);
a := 0; b := 1;
while x > 0 do begin
a := a + 1;
b := b * (x mod 10);
x := x div 10;
end;
writeln(a); write(b);
end.
3) Ниже записана программа. Получив на вход число x, эта программа печатает два числа. Укажите наименьшее из таких чисел x, при вводе которых алгоритм печатает сначала 2, а потом 21.
var x, a, b: integer;
begin
readln(x);
a:=0; b:=1;
while x>0 do begin
a:=a+1;
b:=b*(x mod 10);
x:= x div 10
end;
writeln(a); write(b);
end.

Информативность сообщения это:область взаимодействия между человеком, воспринимающимтекст, и информационной насыщенностью текста, обусловленная избирательной воспринимающего человека, т.е. пределом различимости. Для различимости, т.е. понимания смысла высказывания, переводчику необходимо применить весь предыдущий опыт или знание обстановки общения именно к данному языковому содержанию. Информативность сообщения основывается на следующихтребованиях: (1) синтаксических, согласно которым смысл должен быть логически вводим из наблюдаемого соотношения языковых единиц. Это означает, что переводчик должен установить принадлежность исходного текста к определенной знаковой системе по характеру отношений между знаками,составляющими текст; (2) семантических, согласно которым смысл, выводимый из данного соотношения языковых единиц, отражает то или иное состояние реальной действительности, включая вымысел. Это означает, что переводчик должен соотнести языковое содержание данного текста со смыслом (отражение реальной или вымышленной ситуации); (3) прагматических, согласно которым в смысл, придаваемый тексту, включается оценка как отраженной действительности, так и ее отражения. Это означает,что переводчик должен дать оценку, близкую к авторской или соответствующую непосредственным задачам перевода.

Program P7;
var S:String; n,k1,k2,k3,i:byte;
Begin
writeln('Введите строку:');
readln (S);
n:=length (S);
k1:=0; k2:=0; k3:=0;
For i:=1 to n do 
case S[I] of 
' ' : k1:=k1+1;
',',';','.','!',':','?' : k2:=k2+1;
'b','c','d','f','g','k','l','m','n','p','r','s','t': k3:=k3+1
end;
Writeln ('kolicestvo clov = ',k1+1);
Writeln ('kolicestvo znakov prepinania = ',k2);
writeln('kolicestvo soglasnih = ', k3);
readkey
end.

Пример:
Введите строку:
na ulite sneg.
kolicestvo clov = 3
kolicestvo znakov prepinania = 1
kolicestvo soglasnih = 6