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

Переписать код с Pascal - C++

Восстановить пароль Регистрация
 
Юляшко
2 / 2 / 0
Регистрация: 02.03.2010
Сообщений: 95
10.03.2010, 18:17     Переписать код с Pascal #1
я тут написал на паскале нужно на С++
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;
var
   a,b:integer;
   q:boolean;
   z:real;
begin
 clrscr;
 writeln('введите a,b');
 readln(a,b);
 q:=(b<=4) and (b>=-2) and (b>=8-a) and (b<=a-8);
if q then
   begin
   write('точка попадает');
   z:=(3+b)/a;
   end
else
   begin
   writeln('не попадает');
   if (a>0) or (b>0) then
   z:=(a-5)+(b-5)
else
   z:=2*a+5*b;
   end;
 write('z=',z:0:2);
end.
Вложения
Тип файла: txt dom.txt (389 байт, 17 просмотров)
Лучшие ответы (1)
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
System.exe
 Аватар для System.exe
90 / 86 / 12
Регистрация: 14.05.2009
Сообщений: 202
10.03.2010, 18:58     Переписать код с Pascal #2
Сообщение было отмечено автором темы, экспертом или модератором как ответ
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#include <iostream.h>
main()
{
int a,b;
double z;
cout<<"enter a and b\n";
cin>>a>>b;
if (b<=4 && b>=-2 && b>=8-a && b<=a-8)
cout<<"tochka popadaet\n";
z=(3+b)/a;
else
{
cout<<"tochka ne popadaet\n";
if (a>0 || b>0)
z=(a-5)+(b-5);
else z=2*a+5*b;
}
cout<<"z="<<z<<"\n";
return 0;
}
PointsEqual
ниначмуроФ
 Аватар для PointsEqual
832 / 516 / 33
Регистрация: 12.10.2009
Сообщений: 1,915
10.03.2010, 19:43     Переписать код с Pascal #3
хм....

Добавлено через 1 минуту
Цитата Сообщение от System.exe Посмотреть сообщение
z=(3+b)/a;
else
{
вот это else к чему относится?
программа неправильная
kuroiryuu
 Аватар для kuroiryuu
311 / 295 / 23
Регистрация: 05.11.2009
Сообщений: 698
Завершенные тесты: 2
10.03.2010, 19:51     Переписать код с Pascal #4
Цитата Сообщение от System.exe Посмотреть сообщение
if (b<=4 && b>=-2 && b>=8-a && b<=a-8)
cout<<"tochka popadaet\n";
z=(3+b)/a;
надо просто добавить операторные скобки...
а так всё нормально написано
C++
1
2
3
4
5
if (b<=4 && b>=-2 && b>=8-a && b<=a-8)
{
   cout<<"tochka popadaet\n";
   z=(3+b)/a;
}
Юляшко
2 / 2 / 0
Регистрация: 02.03.2010
Сообщений: 95
10.03.2010, 20:27  [ТС]     Переписать код с Pascal #5
нужно на Си написать: cry:
PointsEqual
ниначмуроФ
 Аватар для PointsEqual
832 / 516 / 33
Регистрация: 12.10.2009
Сообщений: 1,915
10.03.2010, 22:29     Переписать код с Pascal #6
Цитата Сообщение от Юляшко Посмотреть сообщение
нужно на С++
на каком потом надо будет писать?
Yandex
Объявления
10.03.2010, 22:29     Переписать код с Pascal
Ответ Создать тему
Опции темы

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