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

Нужно перевести коды программ с паскаля, в С++! - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Не могу найти ошибку http://www.cyberforum.ru/cpp-beginners/thread839154.html
Здравствуйте, есть задача: Написать программу которая по введенному числу и месяцу рассчитывает день недели и выводит ответ на экран. Условия: Год високосный, начало года выпало на понедельник, также следует учесть все возможные ошибки пользователя. Использовать только алгоритм ветвления. Среда: Borland Написал программу, но не могу понять где ошибка, некоторые даты не считает. #include...
C++ Нарисовать в многомодульной программе * НАДО это нарисовать в многомодульной программе. ** Знаю что можно обойтись без лишних модулей, но если препод сказала, то закон. *** **** ***** СPP ****** http://www.cyberforum.ru/cpp-beginners/thread839127.html
Быстрое умножение C++
Нужно написать алгоритм для быстрого умножения 2-ух 32-битных чисел. Кто подскажет быстрый алгоритм? (как в openssl, только я там разобраться не могу:()
Найти максимальное значение сумм элементов каждой строки в масиве Т, с++ C++
Знайти максимальне значення з сумм елементів кожного рядка в масиві T (13,8) коротких цілих чисел.(укр) Найти максимальное значение сумм элементов каждой строки в масиве Т (13,8) кратких целых чисел(рус.) Ребят помогите с кодом, очень срочно нужно сдать! Буду очень признателен пишу в Борланде. пришлите исходный код пожалуйста!
C++ Шифрование текста http://www.cyberforum.ru/cpp-beginners/thread839079.html
необходимо создать программу что бы зашифровать и расшифровать данный текст путем замены буквы на следующую по алфавиту. помогите пожалуйста, а то третий день уже мучаюсь...
C++ Как организовать поиск файла по маске помогите с организацией поиска файла по маске подробнее

Показать сообщение отдельно
RaphaelGreen
0 / 0 / 0
Регистрация: 16.04.2013
Сообщений: 8
16.04.2013, 08:42     Нужно перевести коды программ с паскаля, в С++!
Если целое число M делится нацело на целое число N, то вывести на экран частное от деления, в противном случае - сообщение ''M на N нацело не делится''.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
  uses
  SysUtils;
  var b,c,a:integer;
 
begin
  writeln ('Ввести 2 числа');
  readln (b,c);
  writeln;
  if m mod c=0 then
  writeln (b div c)
  else writeln ('B на C без остатка не делится');
  readln;
end.
Найти количество положительных (отрицательных) чисел среди четырех целых чисел A, B, C и D
Pascal
1
2
3
4
5
6
7
8
9
10
11
var a,b,c,d,e:integer;
begin
writeln('Введите числа:');
readln(a,b,c,d);
if a>0 then inc(e);
if b>0 then inc(e);
if c>0 then inc(e);
if d>0 then inc(e);
writeln('Количество положительных: ',e);
readln;
end.
Даны три целых числа. Возвести в квадрат отрицательные числа и в третью степень — положительные (число 0 не изменять)
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program kvadr;
var
mas: array[1..3] of real;
a: integer;
 
begin
writeln('Введите 3 числа');
for a:=1 to 3 do readln(mas[a]);
for a:=1 to 3 do begin
                 if mas[a]>0 then mas[a]:=sqr(mas[a])*mas[a];
                 if mas[a]<0 then mas[a]:=sqr(mas[a]);
                 end;
for a:=1 to 3 do writeln(a,'-ое число: ',mas[a]);
end.
Прошу помогите перевести это в с++! Я только начал учиться этому языку программирования, и я плохо знаю его синтаксис!

Добавлено через 17 минут
Если целое число M делится нацело на целое число N, то вывести на экран частное от деления, в противном случае - сообщение ''M на N нацело не делится''.
C++
1
2
3
4
5
6
7
8
#include<iostream>
int main()
{
int m,n;
std::cin >> m >> n;
if(m%n)std::cout << "Ne delitsa" << endl;
else std::cout << m/n << endl;
}
Вроде бы перевёл, но я не знаю, на сколько я правильно сделал..Если не прав, подскажите?

Добавлено через 7 минут
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//---------------------------------------------------------------------------
#include<iostream>
#include<windows.h>
#include <vcl.h>
#pragma hdrstop
 
//---------------------------------------------------------------------------
 
#pragma argsused
int main(int argc, char* argv[])
{ SetConsoleOutputCP(1251);
SetConsoleCP(1251);
  int m,n;
  cout<<"Введите число M\n";
  cin >> m ;
  cout<<"Введите число N\n";
  cin>>n;
if(m%n>0)cout << "Не делится" << endl;
else cout<<"Делитель " << m/n << endl;
  system("pause");
      return 0;
}
//---------------------------------------------------------------------------
Хотя вот так вот, точно работает! ^^
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 18:51. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru