Форум программистов, компьютерный форум, киберфорум
С++ для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 21.01.2019
Сообщений: 10

Перевод с паскаля

25.01.2019, 07:48. Показов 603. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
var x,y:real;
    o1,o2,o3:boolean;
begin
  Readln(x,y);
  o1:=(y<=7) and (y>=1) and (abs(x)*2+y<=15);
  o2:=sqr(x+5)+sqr(y-2)<=9;
  o3:=(sqr(x+5)+sqr(y-2)<9)and(y>1)and(y<2*x+15);
  write(o1 and o2 and not o3)
end.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
25.01.2019, 07:48
Ответы с готовыми решениями:

Перевод из Паскаля в C++
Пожалуйста помогите перевести одну функцию из Паскаля в C++. Буду очень признательна, так как очень плохо знаю Паскаль, а C++ тоже не очень...

Перевод из Паскаля в с++
Задача: Найти все натуральные n-значные числа, цифры в которых образуют строго возрастающую последовательность Есть решение на...

Перевод с Паскаля в С++
var n: longint; max,x: byte; begin write('Введите число n: '); readln(n); max:=n mod 10; while n&gt;0 do begin ...

1
 Аватар для Fixer_84
1505 / 969 / 812
Регистрация: 30.04.2016
Сообщений: 3,337
25.01.2019, 11:09
Dartec, здравствуйте. Вот:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#include <iostream>
#include <cmath>
 
using namespace std;
 
int main() {
double x, y;
bool o1, o2, o3;
cin >> x >> y;
o1 = (y <= 7) && (y >= 1) && (abs(x) * 2 + y <= 15);
o2 = pow(x + 5, 2) + pow(y - 2, 2) <= 9;
o3 = (pow(x + 5, 2) + pow(y - 2 , 2) < 9) && (y > 1) && (y < 2 * x + 15);
cout << (o1 && o2 && !o3) << "\n";
cin.get();
return 0;   
}
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
25.01.2019, 11:09
Помогаю со студенческими работами здесь

Перевод с Паскаля на C++
Помогите пожалуйста перевести это код на C++!!!!!! Uses crt,graph; label 2,3,4; Var dr,md,i,k:integer; d:char; procedure dogd; ...

Перевод с паскаля на С++
const BASE16 = 16; var HexValue : string; Ostatok: Integer; Chastnoe: Integer; begin HexValue := ''; write( 'Введите целое...

Перевод из паскаля в с++
Помогите перевести type matrix = array of integer; var a:matrix; i,j,k:integer; begin k:=0; for i :=1 to...

Перевод с Паскаля в С++
uses crt; type prm=record {прямая с полями, коэффициентами} a,b,c:real; end; tch=record {точка с полями,...

Перевод с паскаля на си
Ребят помогите поджалуйста с переводом! const r=10; n=100; type mas=array of byte; var i,j,a:integer; ...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru