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

Перепишите пожалуйста код с языка Pascal на C++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Даны два класса: ellipse и circle http://www.cyberforum.ru/cpp-beginners/thread990282.html
Помогите решить пожалуйста!Да,я чайник.. :( Даны два класса: ellipse и circle. Объекты этих классов могут быть отображены на экране с помощью функции-члена draw и перемещены с помощью функции-члена move_to. Создать объекты указанных классов, начертить их в нескольких положениях.
C++ Не работает getline Есть прога, которая считает предложения и выводит самое длинное.Есть главный кейс с меню. В первом пункте кейса есть гетлайн, но при выборе этого пункта прога прогоняет кейс до ввода переменной для выхода, не прося ввести текст. Если getline заменить на cin, то он просит ввести текст, но cin читает только до пробела... Почему не работает getline в case. ПЫ.СЫ. Написано все очень криво >_< // 5... http://www.cyberforum.ru/cpp-beginners/thread990280.html
C++ найти и вывести объем тетраэдра
Как найти объем через координаты вершин? Как его написать? //На вход подается некоторое количество тетраэдров(координаты вершин). //Отсортировать и вывести их по возрастанию объемов. #include <iostream> #include <stdio.h> #include <locale> #include <math.h> using namespace std;
целочисленный массив X(n) C++
ребят помогите пожалуйста, не могу сообразить В целочисленный массив X(n) после каждого нечетного элемента вставить максимальный простой элемент этого же массива. Определить среднее арифметическое простых элементов массива до и после вставки. Зарание спасибо.
C++ Составить программу, которая подсчитывает в введенном пользователем тексты количество чисел в десятковый системы. Числом считаем последовательность ци http://www.cyberforum.ru/cpp-beginners/thread990239.html
Составить программу, которая подсчитывает в введенном пользователем тексты количество чисел в десятковый системы. Числом считаем последовательность цифр 0 9.
C++ Непонятна Структура файловой системы Добрый день! Немного непонятно структура программы. Условие - http://smages.com/images/img201aha.jpg Все нужно оформить через классы. Вот, что пока получается, но кажется, что не совсем правильно делаю. #pragma once class FileSystem { public: подробнее

Показать сообщение отдельно
qwer1234
13 / 13 / 3
Регистрация: 30.10.2012
Сообщений: 463

Перепишите пожалуйста код с языка Pascal на C++ - C++

28.10.2013, 10:51. Просмотров 189. Ответов 0
Метки (Все метки)

Вот сам код.

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
36
37
38
39
40
{$N+}
uses crt;
const nmax=60;
function Step2(n:byte):extended;
var p:extended;
i:byte;
begin
p:=1;
for i:=1 to n do
p:=p*2;
Step2:=p;
end;
function Prost(n:longint):boolean;
var i:longint;
begin
if n<2 then Prost:=false
else
begin
Prost:=true;
for i:=2 to round(sqrt(n)) do
if n mod i=0 then
begin
Prost:=false;
break;
end;
end;
end;
 
var n,i:byte;
begin
clrscr;
repeat
write('Введите число до ',nmax,' n=');
readln(n);
until n in [1..nmax];
for i:=1 to n-1 do
if Prost(i) then
writeln(Step2(i)-1:0:0,' ');
readln
end.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 04:02. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru