Форум программистов, компьютерный форум CyberForum.ru

из паскал в с++ - C++

Восстановить пароль Регистрация
 
aaadrey
0 / 0 / 0
Регистрация: 07.01.2012
Сообщений: 9
01.06.2012, 10:07     из паскал в с++ #1
помогите переделать программу из паскал в с++ вод код:
Pascal
1
2
3
4
5
6
7
8
9
10
function S(N: LongInt): Integer; 
var Res : Integer; 
begin 
Res := 0; 
while N <> 0 do begin 
Res := Res + N mod 10; 
N := N div 10; 
end; 
S := Res; {или Result := Res; для Delphi} 
end;
вот сама задача
Определить функцию S(n), вычисляющую сумму цифр заданного натурального числа.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.06.2012, 10:07     из паскал в с++
Посмотрите здесь:

Как сделать чтобы Паскал открывался во весь экран. Pascal
Pascal стринг паскал
Неработает паскал на Windows 7 x64 Pascal
помогите с паскал турбо
как сделать меню в паскал? Turbo Pascal
2 Паскал программы 1200 рублей
Кто знает Турбо Паскал

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
zss
Модератор
Эксперт С++
 Аватар для zss
5942 / 5547 / 1783
Регистрация: 18.12.2011
Сообщений: 14,154
Завершенные тесты: 1
01.06.2012, 10:39     из паскал в с++ #2
C++
1
2
3
4
5
6
7
8
9
10
int S(int n)
{
    int sum=0;
    while(n>0)
    {
       sum+=n%10;
       n/=10;
    }
    return sum;
}
Yandex
Объявления
01.06.2012, 10:39     из паскал в с++
Ответ Создать тему
Опции темы

Текущее время: 08:18. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru