Форум программистов, компьютерный форум, киберфорум
Наши страницы

Помогоите переделать программу из Паскаль на СИ вот сама программа - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Как добавить компилятор C++ в среду IDE NetBeans? http://www.cyberforum.ru/cpp-beginners/thread804330.html
Скачал самую полную версию IDE NetBeans и при создании C++ проекта он ругается, что нет компиляторов C++ в системе. Сделал все как требуется. Скачал и установил Cygiwin полный набор компонентов....
C++ Использование классов Составить программу для объявления и использования данных типа класс согласно индивидуальному заданию, Базовый (транспортное средство) Производный (самолет) Производный(дельтоплан) Суть... http://www.cyberforum.ru/cpp-beginners/thread804327.html
C++ Нужно непременно записать текст в файл. fflush не работает
Такая проблема. Нужно сделать так, чтобы как только программа вызовет fputs(), fwprintf() или другую подобную функцию, данные в файл записались мгновенно, а не через какое то время. Как это сделать?...
Метод, возвращающий данные по имеющемуся ключу массива MAP C++
Исходный код: #include <string> #include "map.h" class Recipe{ protected: AnsiString name_recipe; //название рецепта (блюда) AnsiString istruction_recipe; ...
C++ Что такое порядок инициализации таблицы виртуальных методов? http://www.cyberforum.ru/cpp-beginners/thread804302.html
Что-то я не переварил это.
C++ Работа со строками (удаление из строки указанного символа) Недавно начал изучать С++ в универе. Задали написать программу реализующую удаление из строки указанного символа. Программа компилируется, но правильно работать отказывается. Где я накосячил? ... подробнее

Показать сообщение отдельно
Semko1
0 / 0 / 0
Регистрация: 10.03.2013
Сообщений: 13

Помогоите переделать программу из Паскаль на СИ вот сама программа - C++

10.03.2013, 01:03. Просмотров 507. Ответов 8
Метки (Все метки)

Дано натуральне число n. Получить все простые делители этого числа:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
program p1;
var i,j,n,k:longint;
begin
readln (n);
k:=1;
while k<n do
begin
if n mod k=0 then
begin
j:=0;
for i:=2 to (k-1) do
if k mod i=0 then j:=1;
if j=0 then
writeln (k);
end;
k:=k+1;
end;
end.

Помогите передалать на язык СИ
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru