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

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
sektor2009
3 / 3 / 0
Регистрация: 15.03.2009
Сообщений: 339
#1

Нужно переписать код в паскаль - C++

30.03.2011, 18:15. Просмотров 341. Ответов 1
Метки нет (Все метки)

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
#include "stdafx.h"
#include <iostream>
using namespace std;
bool simple(int x)
 
{
    for (int i=2; i<=(x/2);i++)
    {
        if (!(x%i))
        {
            return false;
        }
    }
    return true;
}
int main()
{
    int a,b;
    cout<<"Enter a->" 
    cin>>a;
    cout<<"Enter b->" 
    cin>>b;
    cout<<endl<<"Result ->";
    for ( int i=a; i<=b;i++)
    {
        if (simple(i) && i>=2)
        {
            cout<<i<<" ";
        }
    }
 
    system("pause");
    return 0;
}
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.03.2011, 18:15
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Нужно переписать код в паскаль (C++):

Переписать код с паскаль на С++ - C++
это 1 program 1; var a,b:array of real; i,n:integer; begin readln(n); setlength(a,n);

Переписать код с паскаль на С++ - C++
Program 1; Var mas:array of real; i,m,n,kolvo:integer; shar,v,r:real; Begin // Задаем рандомно матрицу с элементами // ...

Нужна помощь программистов которые смогу переписать код из Паскаль в С++ - C++
Добрый день! Нужна помощь программистов которые смогу переписать код из Паскаль в С++, поможет кто ? var s, a, i, r, k, m:int64; ...

Пытаюсь переписать код с циклом for, в код с циклом while, но не совсем получается - C++
Возникло пару вопросов: #include &lt;iostream&gt; using namespace std; int main () { for (int i = 0; i&lt;=10; i++) cout &lt;&lt;...

Переписать код - C++
нужна помощь в изменении когда. данный код #include &lt;iostream&gt; using namespace std; double Max(double a, double b){ return a &gt; b...

Переписать код - C++
вот нашел код программы похожий по условию, может кто перепишет, под мою прогу. Мое условие: 68. В одномерном массиве с четным...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
snql
3 / 3 / 0
Регистрация: 16.02.2010
Сообщений: 26
30.03.2011, 19:42 #2
Пробуйте.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
var a, b, i: integer;
 
function simple(x:integer):boolean;
var i : integer;
begin
  i:=2;
  while (i <= round(x/2)) do
  begin
    if ((x mod i) = 0) then
    begin
      simple := false;
      exit;
    end;
    inc(i);
  end;
  simple := true;
end;
 
  
begin
  write('Enter a->');
  readln(a);
  write('Enter b->');
  readln(b);
  writeln;
  write('Result ->');
  i := a;
  while (i <= b) do
  begin
    if (simple(i) and (i >= 2)) then
      write(i, ' ');
    inc(i);
  end;
  readln; 
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
30.03.2011, 19:42
Привет! Вот еще темы с ответами:

Переписать код на с++ - C++
#include &lt;iostream&gt; #include &lt;string&gt; #include &lt;sstream&gt; #include &lt;iterator&gt; int main() { std::string str, tmp; ...

переписать код с++ - C++
Задача: Написать программу, которая считывает текст из файла и выводит его на экран, после каждого предложения добавляя, сколько раз...

Переписать код с Си - C++
FILE *f; char s = {0}; f=fopen(&quot;filename.txt&quot;,&quot;rt&quot;); char buff; int count; do ...

Код написан в Dev C. Не работает в Visual. Как нужно переделать код? - C++
Здравствуйте. Столкнулась с такой проблемой: код был написан в Dev C, но в Visual он выдаёт ошибку. ...


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

Или воспользуйтесь поиском по форуму:
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru