Есть ответ 👍

Найти количество цифр 7 в натуральном числе n.

193
416
Посмотреть ответы 2

Ответы на вопрос:

Demaniza
4,4(59 оценок)

//pascalabc.net //версия 3.3, сборка 1634 begin var n: =readinteger('введите натуральное число: '); write('в числе ',n.tostring.where(x-> x='7').count,' цифр 7'); end.

Var ar: array of integer; max,i,n: integer; begin; randomize; max: =-2147483648; readln(n); setlength(ar,n+1); writeln('array: '); for i: =1 to n do begin; ar[i]: =random(-10,10); write(ar[i]: 4); if ar[i]> max then max: =ar[i]; end; ar[1]: =max*2; ar[n]: =max*2; writeln; writeln('final array: '); for i: =1 to n do write(ar[i]: 4); end.

Популярно: Информатика