Номер минимальной цифры паскальнайти номер минимальной цифры натурального числа n.inputсо стандартного устройства ввода вводится 1 натуральное число, не превосходящее2000000000.outputнужно выдать на стандартное устройство вывода 1 цифру – номер наименьшей цифрыво введенном числе. если наименьшая цифра встречается несколько раз, выдать номертой, которая ближе к разряду единиц.sample input sample output123856187 718506797 4

1) var a,b: integer; begin readln(a,b); writeln('сумма единиц: ',a mod 10+b mod 10); writeln('сумма десятков: ',(a div 10) mod 10+(b div 10) mod 10); end. 2)var a: integer; begin readln(a); if a mod 2=0 then writeln('делится на 2') else writeln('не делится на 2'); if a mod 3=0 then writeln('делится на 3') else writeln('не делится на 3'); if a mod 5=0 then writeln('делится на 5') else writeln('не делится на 5'); end. 3)var a,b,c: integer; begin readln(a); c: =a; while a> 0 do begin   b: =10*b+a mod 10;   a: =a div 10; end; writeln(c-b); end.

Написать програму которая считывает текст с клавиатуры, находит самое длинное число и определяет, сколько раз оно встретилось в тексте. код c++ #include < conio.h> #include < stdio.h> #include < string.h> #include < iostream.h> void main(); {clrscr(); char s[50]; char s1{}=" "; char *p; char *q; char e[50]; int g,a; cout< < "vvedite tekst: "< < endl< < endl; gets(s); p=strtok(s,s1); while(p) {if(*p==' ') p=strtok(s,s1); g=strlen(p); cout< < endl< < g< < endl; if(a< g) {a=g; *e=*p; } p=strtok(null,s1); } puts(e); cout< < endl< < e; getch(); }