Перевести код с Паскаля на С++

@PROGRAMMA2021 · Регистрация: 26.03.2021

Студворк — интернет-сервис помощи студентам

Pascal

uses crt;
const n=45;
var a,ko,kn,i:integer;
begin
clrscr;
writeln('Введите ',n,' целых чисел:');
ko:=0;
kn:=0;
for i:=1 to n do
 begin
  write('a=',i:2);
  readln(a);
  if(a<0)and(i<=35)then ko:=ko+1;
  if a=0 then kn:=kn+1;
 end;
writeln('Количество отрицательных в первых 35=',ko);
write('Количество нолей всей последовательности=',kn);
readln
end.

@matviiv · 30.03.2021, 22:01

Вроде так (и на будущие домашнее задание лучше не копировать с других языков, если есть задание которой не знаете, задаете вопрос по нему, а не ето):

C++

#include<iostream>
 
using namespace std;
int main()
{
    system("chcp 1251>nul");
    const int n = 45;
    int a, ko, kn, i;
    cout << "Введите " << n << "целих чисел" << endl;
    ko = 0;
    kn= 0;
    for (i = 1; i < n; i++) {
        cin >> a;
        if ((a < 0) && (i <= 35)) ko = ko + 1;
        else if (a == 0) kn = kn + 1;
    }
    cout<<"Количество отрицательных в первых 35="<<ko << endl;
    cout<<"Количество нолей всей последовательности="<<kn;
    system("pause");
    return 0;
}

	30.03.2021, 22:01

Опции темы