Новые сообщения · Правила  
  • Страница 1 из 1
  • 1
Модератор форума: Berestovskiy  
Нужна помощ...
Пусть дана матрица А(nxn). Упорядочьте строки по неубыванию сумм цифр элементов этой строки. Воспользуйтесь функцией, определяющей для каждого числа сумму его цифр.

sLip
1 | Автор: AvoqzT | 2012-04-10, 19:30   |  Репутация: [ + 0 ]


sLip
1 | Автор: AvoqzT | 2012-04-10, 19:30   |  Репутация: [ + 0 ]
var
a,s:integer;
begin
s:=0;
read(a);
while a>10 do begin
s:=s+a mod 10;
a:=a div 10;
end;
s:=s+a;
writeln(s);
end.

Вот программа подсчитывающая сумму цифр числа А; тебе хватит этого или писать весь код?)


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2012-04-10, 19:40   |  Репутация: [ + 211 ]
если можешь лучше полностью напиши....

sLip
3 | Автор: AvoqzT | 2012-04-10, 19:59   |  Репутация: [ + 0 ]
  • Страница 1 из 1
  • 1
Поиск: