Дано натуральное число n
Автор Ёлавик Гайдай задал вопрос в разделе Другие языки и технологии
дано натуральное число n вычислить сколько цифр в числе n и чему равна сумма его цифр паскаль и получил лучший ответ
Ответ от Никита Матросов[гуру]
var n: string; s,i: integer; begin read(n); s:=0; for i:=1 to length(n) do inc(s, ord(n[ i ]) - 48); Writeln(\'Цифр - \',length(n),\' сумма = \',s); end.
Ответ от Морозов Максим[гуру]
держи чувак.. . Program cool; var n, sum, kol: integer; begin write('Введите натуральное число n: '); readln(n); while n>0 do begin sum:=(n mod 10) + sum; n:=n div 10; kol:=kol + 1; end; writeln(
держи чувак.. . Program cool; var n, sum, kol: integer; begin write('Введите натуральное число n: '); readln(n); while n>0 do begin sum:=(n mod 10) + sum; n:=n div 10; kol:=kol + 1; end; writeln(
Ответ от Георгий Зотиков[гуру]
program sumcifr; uses crt; var n: longint; s: integer; j:integer; begin clrscr; s:=0; j:=0; write('ввести число --> ');readln(n); while n>0 do begin j:=j+1; s:=s+n mod 10; n:=n div 10; end; wri
program sumcifr; uses crt; var n: longint; s: integer; j:integer; begin clrscr; s:=0; j:=0; write('ввести число --> ');readln(n); while n>0 do begin j:=j+1; s:=s+n mod 10; n:=n div 10; end; wri
Ответ от Ѕулиганов Иосиф[гуру]
Натуральное число в паскале представлено в двоичном виде. Тебе нужно количество и сумма двоичных цифр? Или как?
Натуральное число в паскале представлено в двоичном виде. Тебе нужно количество и сумма двоичных цифр? Или как?
Ответ от 22 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: дано натуральное число n вычислить сколько цифр в числе n и чему равна сумма его цифр паскаль