0 / 0 / 0
Регистрация: 17.04.2021
Сообщений: 1
1

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

17.04.2021, 11:22. Показов 931. Ответов 1
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
var N, a, num: integer; begin
     N:= 0;
num:= 0;
readln(a);
while a<>0 do begin
num:=num+1;
if (a mod 2 <> 0) and (a mod 3 = 0) then N : = N + 1;
readln(a);
end;
writeln(num); writeln(N);
end.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.04.2021, 11:22
Ответы с готовыми решениями:

Перевести код с Паскаля на С++
uses crt; var i,n: integer; sum: longint; x: array of integer; begin Writeln('Количество...

Перевести код с Паскаля на C++
begin var число := ReadInteger('Введите трехзначное натуральное число:'); var (сотни,...

Перевести код с Паскаля на С++
uses crt; var i,n,k: integer; sum: longint; x: array of integer; begin Writeln('Количество...

Перевести код с Паскаля на Си++
Добрый всем день! Будьте добры, перепишете пожалуйста данную программу из паскаля на си++. Буду...

1
Эксперт CЭксперт С++
3458 / 2038 / 1113
Регистрация: 14.12.2018
Сообщений: 4,001
Записей в блоге: 1
17.04.2021, 11:26 2
Лучший ответ Сообщение было отмечено AntiFreezee как решение

Решение

Цитата Сообщение от AntiFreezee Посмотреть сообщение
Перевести код с паскаля на C++
Можно:
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
#include <iostream>
using namespace std;
 
int main()
{
    setlocale(LC_ALL, "ru");
 
    int N, a, num;
    N = 0;
    num = 0;
    cin >> a;
    while (a)
    {
        num++;
        if (a % 2 && a % 3 == 0)
            N++;
        cin >> a;
    }
    cout << num << endl;
    cout << N << endl;
 
    system("pause");
    return 0;
}
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.04.2021, 11:26
Помогаю со студенческими работами здесь

Перевести код из Паскаля в С++
Помогите, пожалуйста перевести в с++ uses crt; const nmax=20; var a:array of integer; ...

перевести код с паскаля на с++
помогите перевести код с паскаля var x1,y1,x2,y2,x,y:real; f:boolean; begin...

Перевести код с Паскаля на С++
uses crt; var a: array of word; i: integer; begin...

Перевести код с Паскаля на С++
uses crt; const n=45; var a,ko,kn,i:integer; begin clrscr; writeln('Введите ',n,' целых...

Перевести код с паскаля на C++
По заданному натуральному числу N необходимо вычислить количество натуральных чисел, которые...

Перевести код с Паскаля на С++
Фирме принадлежат два магазина. Известна стоимость товаров, проданных в каждом магазине за каждый...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru