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

Нужно перевести программы из Pascal в C - C++

Восстановить пароль Регистрация
 
mcbeat
0 / 0 / 0
Регистрация: 07.02.2011
Сообщений: 30
01.06.2011, 01:12     Нужно перевести программы из Pascal в C #1
1. Дано трехзначное число. В этом числе зачеркнуть первую цифру справа и приписать его слева. Вывести полученное число.
Pascal
1
2
3
4
5
6
7
8
9
10
 var
    a,x,y,z : integer;
 begin
   write('Введіть тризначне число  ');
   readln (a);
   x:=a div 10 div 10;
   y:=a div 10 mod 10;
   z:=a mod 10;
   writeln ('Нове число =',y,z,x);
end.
2. Найти максимальное значение среди выражений (a*4; a^2+c; b+c)
Числа a,b,c вводятся с клавиатуры.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
program N2_1;
var x,y,z,a,b,c,max: real;
begin
     write('введыть a=');
     readln(a);
     write('введыть b=');
     readln(b);
     write('введыть c=');
     readln(c);
     x:=4*a;y:=sqr(a)+c;z:=b+c;
     if x>y then max:=x else max:=y;
     if z>max then max:=z;
     writeln('Найбільше значення =',max:5:2);
end.
3.Найти значение Х.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
program N2_2;
var x,a,b,x1,x2,x3:real;
   begin
     write('введіть a=');
     readln(a);
     write('введіть b=');
     readln(b);
     x1:=sqrt(a)*b-1;x2:=8;x3:=a*3+b;
     if a=b then x:=x1;
     if a<b then x:=x2;
     if a>b then x:=x3;
     writeln('X=',x:6:1);
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.06.2011, 01:12     Нужно перевести программы из Pascal в C
Посмотрите здесь:

Перевести синтаксис программы с Delphi в C++, очень нужно C++
C++ перевести с Pascal на С++
Нужно перевести на язык Pascal C++
C++ Перевести с Pascal на C++
C++ Перевести с Pascal на C++
Перевести с Pascal на C++ C++
C++ Перевести из Pascal в C++
C++ Перевести с Pascal на C++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
diagon
Higher
 Аватар для diagon
1920 / 1186 / 49
Регистрация: 02.05.2010
Сообщений: 2,925
Записей в блоге: 2
01.06.2011, 06:14     Нужно перевести программы из Pascal в C #2
1(не переписывал с быдлокода, написал сам)
C++
1
2
3
4
5
6
7
8
9
10
#include <stdio.h>
int main(){
    int a,temp;
    printf("number:\n");
    scanf("%d",&a);
    temp=a%10;
    a/=10;
    printf("%d%d",temp,a);
    return 0;
}
Добавлено через 6 минут
2(переписал с паскаля)
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
#include <stdio.h>
int main(){
    double a,b,c,x,y,z,max;
    printf("a, b, c:\n");
    scanf("%lf%lf%lf",&a,&b,&c);
    x=4*a;
    y=a*a+c;
    z=b+c;
    max=(x>y)?x:y;
    if (z>max) max=z;
    printf("max-%lg",max);
    return 0;
}
Добавлено через 5 минут
3(также перевел)
C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#include <stdio.h>
#include <math.h>
int main(){
    double a,b,x1,x2,x3,x;
    printf("a, b:\n");
    scanf("%lf%lf",&a,&b);
    x1=sqrt(a)*b;
    x2=8;
    x3=a*3+b;
    if (a ==b) x=x1;
    if (a < b) x=x2;
    if (a > b) x=x3;
    printf("X-%lg",x);
    return 0;
}
Yandex
Объявления
01.06.2011, 06:14     Нужно перевести программы из Pascal в C
Ответ Создать тему
Опции темы

Текущее время: 21:35. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru