Дано натуральное число n. выбросить из записи числа n цифры 0 и 5, оставив прежним порядок остальных цифр. например, из числа 59015509 должно получится 919

как то так

 

 

 

program pr; uses crt; var i,n,a,s: integer; beginwriteln('введите. n'); readln(n); i: =1; s: =0; while n< > 0 dobegina: =n mod 10; if (a< > 0) and (a< > 5) thenbegin          s: =s+a*i;           i: =i*10; end; n: =n div 10; end; writeln(s); end.

program jfe3;

const n=10; {это будет кол-во элементов массива}

var a: array [1..n] of integer; i,s: integer;

begin

for i: =1 to n do begin

                            a[i]: =random(100);     {элемент выбирается случайно от 0 до 100}

                            s: =s+a[i];   {когда эл. присвоился, его значение плюсуется к общ сумме}

                        end;

for i: =1 to n do

writeln(a[i],' ');     {показать сам массив}

writeln(s);   {показать сумму}

readln;   {чтобы окно сразу не закрывалось}

end.

 

если есть вопросы по программе, пиши в личку. если надо что-то еще - тоже =)

удачи)

Как могут соотноситься между собой числа: (a) одно число 0, второе - нечетное в промежутке [1, 27] (получается, если в исходном числе одна четная цифра - 0 - и три нечетных, или три нуля и одно нечетное) (b) одно число 0, второе - четное в промежутке [2, 36] (получается, если в исходном числе нет нечетных цифр или нет четных цифр или два нуля и две нечетные цифры) (с) одно число четное в промежутке [2, 8], второе нечетное в промежутке [3, 27] (получается, если одна чётная цифра и три нечётных) (d) одно число четное в промежутке [2, 24], второе нечетное в промежутке [1, 9] (получается, если одна нечётная  цифра и три четных) (e) оба числа четные, одно в промежутке [2, 18], второе в промежутке [2, 16] (получается, если две чётных цифры  и две нечётных) дальше каждое число (кроме 370) разбито на 2, в скобках стоит тот случай, под который подпадает число 236: 23, 6 (c, +) 1313: 13, 13 270: 27, 0 (a, +) 1114: 11, 14 (< , -) 1614: 16, 14 (e, +) 187: 18, 7  (c, +) 370: - 294: 29, 4 40: 4, 0 (b, +) ответ. 5 чисел