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

Перевод кода с Pascal - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Нужно перенести с Паскаля на Си++ http://www.cyberforum.ru/cpp-beginners/thread1221080.html
var i, j: integer; begin for i := -2 to 2 do if i <> 0 then for j := 0 to 99 do write(i * 200 + j * i div abs(i):5); readln end. Используйте теги форматирования кода. Замечание
C++ Перевод кода с Pascal var k,n,m:integer; x,s,p,t:real; begin repeat write('x<>0 x=');{х в знаменателе, исключаем заведомое деление на 0} readln(x); until x<>0; repeat write('n>0 n='); readln(n); http://www.cyberforum.ru/cpp-beginners/thread1221079.html
C++ Перевод кода с Pascal
const p=1; const x=2.1; var t,a,b,y:real; begin write('t='); readln(t); b:=sin(p*p)+Power(x,3); a:=Power(exp(1), sqrt(abs(x))); y:=Power(a,3)/Power(b,2); write('y=',y)
C++ Вывести разницу дней между двумя датами
Всем привет. Ребят, прошу вашей помощи#include <iostream> using namespace std; class Date{ private: int raz, sch; int day, day2; int month, month2; int year, year2; public:
C++ Как обнулить указатель на одну ячейку в динамически-выделенной памяти? http://www.cyberforum.ru/cpp-beginners/thread1221014.html
Выделю память под 10 элементов: int* p = new int; Наполняю значениями: for(int i = 0; i<10; i++) { p = i; } Можно ли обнулить указатель, например для последнего элемента в этом массиве? Что-то типа такого: p = nullptr; но пишет, что в операторе разные значения стоят по обе стороны от оператора присваивания.
C++ Что означает запись ++arr1[arr2[i]] Привет всем . Вот нашел код но не поиму что значит запись ++frequency ] ; //вот все что её касаеться меня интерисует от А-Я что и как она работает подробно . Гуглил но не нашел токой информации. Знаю то что она берёт значения один за другим с помощу цыкла но и сумирует каждый элемент массива но как она распределяет единицы к еденицам , двойки к двойкам . Обычно в таком случае я бы... подробнее

Показать сообщение отдельно
assasin21rus
2 / 2 / 1
Регистрация: 02.04.2014
Сообщений: 86
02.07.2014, 08:38     Перевод кода с Pascal
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
uses crt;
const n = 17;
var
    arr: array[1..n] of integer;
    sum: integer;
    i: byte;
    k,d,e: integer;
 
begin
 
    sum := 0;
    for i := 1 to n do
    begin
        arr[i]:=random(90)+10;
        write (arr[i],' ');
     end;
    for i := 1 to n do
    begin
        d:=arr[i] div 10;
        e:=arr[i] mod 10;
        sum:=sum+d+e;
     end;
    writeln;
    writeln ('sum = ', sum);
end.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 19:51. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru