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

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
ZayacV
2 / 2 / 2
Регистрация: 27.10.2013
Сообщений: 72
#1

Помогите переписать из Паскаля на С++ - C++

03.05.2014, 20:43. Просмотров 149. Ответов 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
26
27
28
29
30
31
32
33
34
35
36
var
j,i:integer;
N:integer;
Max:real;
a,b:real;
Mas: array [1..100] of real;
begin
 write('Введите N ( N < 100):'); readln(N);
 write('Введите a:'); readln(a);
 write('Введите b:'); readln(b);
 
for i:=1 to N do
  begin
  write('Mas[',i,']=');
  read(Mas[i]);
  end;
writeln('Результат');
max:=Mas[1];
for i:=2 to N do
  begin
  if Mas[i]>Max then max:=Mas[i];
  end;
j:=1;
for i:=1 to N do
  begin
    mas[j]:=mas[i];
  if (Mas[i]>=a)and(mas[i]<=b) then dec(j);
    inc(j);
 end;
for i:=j to N do mas[i]:=0;
writeln;
for i:=1 to N do writeln('mas[',i,']=',mas[i]);
writeln;
writeln('Max=',Max);
readln;
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
03.05.2014, 20:43     Помогите переписать из Паскаля на С++
Посмотрите здесь:

Переписать з паскаля на С C++
C++ Переписать функцию с Паскаля на С++
Переписать код с Паскаля на С++ C++
C++ Переписать с паскаля на С++
Переписать с Паскаля в с++ C++
Переписать с Паскаля на С++ C++
C++ переписать из паскаля в с++
Переписать из паскаля C++
C++ Переписать с Паскаля на С++
C++ Переписать с паскаля на С
Переписать из Паскаля в С++ C++
C++ Переписать с Паскаля на C++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Goido Kodaka
0 / 0 / 0
Регистрация: 08.04.2014
Сообщений: 16
03.05.2014, 20:56     Помогите переписать из Паскаля на С++ #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
27
28
29
30
31
32
33
34
35
#include <stdio.h>
 
void main()
{
  int i,j,N;
  float a,b,Max;
  float Mas[100];
  printf("Введите N ( N < 100): "); scanf("%d",&N);
  printf("Введите a: "); scanf("%f",&a);
  printf("Введите b: "); scanf("%f",&b);
  for (i = 0; i < N; i++)
  {
    printf("Mas[%f]=",i);
    scanf("%f",&Mas[i]);
  }
  printf("Результат\n ");
  Max = Mas[0];
  for (i = 1; i< N; i++)
    if (Mas[i] > Max) Max = Mas[i];
  j = 0;
  for (i = 0; i<N; i++)
  {
    Mas[j] = Mas[i];
    if (Mas[i]>=a && Mas[i]<=b)
      j--;
    j++;
  }
  for (i = j; i<N; i++)
    Mas[i] = 0;
  printf("\n");
  for (i = 0; i<N; i++)
    printf("Mas[%f]=",Mas[i]);
  printf("\n");
  printf("Max=%f\n,Max");  
}
Как-то так)
Yandex
Объявления
03.05.2014, 20:56     Помогите переписать из Паскаля на С++
Ответ Создать тему
Опции темы

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