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

C++

Войти
Регистрация
Восстановить пароль
 
Дарья Прохорова
1 / 1 / 0
Регистрация: 03.12.2009
Сообщений: 81
#1

из паскаля в си_1 - C++

28.04.2010, 13:57. Просмотров 354. Ответов 3
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
program kontrolnaya;
uses crt;
var a,b,z,r:real;
begin
clrscr;
write('a=');readln(a);
write('b=');readln(b);
write('r=');readln(r);
if (((a-5)*(a-5)+b*b<r*r) and not((a+5)*(a+5)+b*b<r*r)) or (((a+5)*(a+5)+b*b<r*r) and not((a-5)*(a-5)+b*b<r*r)) then
 begin
  writeln('Точка попадает в область!');
  z:=a*a-3*b;
 end
else
 begin
  writeln('Точка не попадает в область!');
  if (a<0)and(b<0) then z:=25+a+b
  else z:=a-b;
 end;
write('Z=',z:0:2);
readln
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
28.04.2010, 13:57     из паскаля в си_1
Посмотрите здесь:

C Паскаля на С++ - C++
помогите пожалуйста переделать это на С++ язык...очень нужно { На интервале (1000 ; 9999) найти все простые числа, каждое из...

с паскаля на Си++ - C++
uses crt; var a:array of integer; i,n,max,min:integer; c:char; begin ClrScr; repeat writeln('Выберите действие:');...

с паскаля в с++ - C++
помогите перевести с код паскаля в с++ program MYstring; var len1, len2:byte; s1, s2: string; function center (s1,s2:string;...

С Паскаля на С++ - C++
Дана целочисленная матрица размера M × N. Найти количество ее строк, все элементы которых различны. ...

из паскаля в си) - C++
Переведите мне пожалуйста прогу, написанную в паскале, в си))))) для меня это очень важно))))))) завтра последний срок) program...

С паскаля на с++ - C++
Приветствую всех! Я запустил с++ и мне на зачет нужна вроде простая программа, знаю ее на паскале: var f,g:file of...

Из Паскаля на С++ - C++
Здравствуйте. Помогите переписать это решение на C++. uses crt; var a:integer; function del(n:integer):integer; var...

с паскаля на с++ - C++
Program z1; uses crt; const n=10; type matr = array of integer; var i,j,ks1,ks2,min:integer; a:matr;

Из паскаля в С++ - C++
Начал С++ недавно изучать. Школе писал на паскале. Вот исходник никак немогу перевести на С++. Через for &amp; while по провал не получается....

С паскаля в С++ - C++
{task array6} const maxSize=100; type Tarr=array of integer; var m:Tarr; i,n,a,b:integer; begin repeat

Из Паскаля на СИ - C++
const c = 9; var a, b, x, y: real; begin write('Введите x: '); readln(x); b := x + c * c; a := exp(ln(abs(92))...

из паскаля в с++ - C++
товарищи помогите плиз перевести код из паскаля в с++))) program fg; var A:array of integer; n,i,j:integer; procedure...


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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
<Norton>
Отдыхающий:)
94 / 91 / 10
Регистрация: 05.04.2009
Сообщений: 188
28.04.2010, 22:06     из паскаля в си_1 #2
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
#include <stdio.h>
 
int main()
{
    float a, b, r, z;
    printf("a=");
    scanf("%f", &a);
    printf("b=");
    scanf("%f", &b);
    printf("r=");
    scanf("%f", &r);
    if ((((a-5)*(a-5)+b*b<r*r) && \
       !((a+5)*(a+5)+b*b<r*r)) || \
       (((a+5)*(a+5)+b*b<r*r) &&  \
       !((a-5)*(a-5)+b*b<r*r))){
        printf("The point is in the area!\n");
        z = a*a-3*b;}
    else{
        printf("The point isn\'t in the area\n");
        if ((a<0) && (b<0))
            z = 25+a+b;
        else
            z = a-b;}
    printf("Z=%.2f\n", z);
    return 0;
}
NightmareCode
14 / 7 / 1
Регистрация: 20.09.2009
Сообщений: 89
28.04.2010, 23:50     из паскаля в си_1 #3
Зачем делать лишние посты?
Чтоб рейтинг набивать? Я же дал ссылку на нормальные трансляторы Транслятор с паскаля на С
<Norton>
Отдыхающий:)
94 / 91 / 10
Регистрация: 05.04.2009
Сообщений: 188
29.04.2010, 09:51     из паскаля в си_1 #4
NightmareCode, извините... Хотел просто человеку помочь.
Yandex
Объявления
29.04.2010, 09:51     из паскаля в си_1
Ответ Создать тему
Опции темы

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