Перевести на C++

@U4_nik · Регистрация: 12.05.2011

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

есть прграммы написанные на паскале, помогите пожалуйста перевести их код на C++, вот условия:

1)Написать программу,который вычисляет оптимальный вес для пользователя,сравнивает его с реальным и выдает рекомендацию о необходимости поправиться или похудеть.Оптимальный вес вычисляется по формуле:Рост(см)-100=Вес(кг).

Pascal
1
2
3
4
5
6
7
8
9
10
var
  rost, ves: integer;
 
begin
  write('Введите рост: ');readln(rost);
  write('Введите вес: ');readln(ves);
  if rost - 100 > ves then writeln('ешь больше');
  if rost - 100 = ves then writeln('ты идеален :D');
  if rost - 100 < ves then writeln('ешь меньше');
end.

2)Имеется текстовый файл.Найти длину самой длинной строки.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
uses crt;
var f:text;
    s:string;
    mx:byte;
begin
clrscr;
assign(f,'file1.txt');
reset(f);
mx:=0;
while not eof(f) do
 begin
  readln(f,s);
  if length(s)>mx then mx:=length(s);
 end;
close(f);
write('Наибольшая длина строки в файле=',mx);
readln
end.

спасибо!!!

@Петррр · 06.07.2012, 14:51

1

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#include <iostream>
 
int main()
{
    size_t growth, // рост
        weight;    // вес
    std::cout << "Growth: ";
    std::cin >> growth;
    std::cout << "Weight: ";
    std::cin >> weight;
    if (growth - 100 > weight)
        std::cout << "eat more" << std::endl;
    else if (growth - 100 == weight)
        std::cout << "you are perfect" << std::endl;
    else 
        std::cout << "eat less" << std::endl;
    //system("pause");
    return 0;   
}

Добавлено через 5 минут
2

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#include <iostream>
#include <fstream>
#include <string>
 
int main()
{
    std::ifstream in("E:\\Temp\\1.txt");
    if (!in.is_open())
    {
        std::cerr << "could not open file" << std::endl;
        return 1;
    }
    std::string buf;
    size_t max_len = 0;
    while (std::getline(in, buf, '\n'))
        if (buf.size() > max_len)
            max_len = buf.size();
    std::cout << "Max len: " << max_len << std::endl;
    in.close();
    system("pause");
    return 0;
}

@ZaMaZaN4iK · 06.07.2012, 14:58

Пожалуйста! Вот первая задача.

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
// nomer1.cpp: главный файл проекта.
 
#include "stdafx.h"
#include <conio.h>
#include <stdio.h>
#include <iostream>
 
using namespace::std;
 
int main()
{
    system("chcp 1251");
    float rost, ves;
    printf("Введите рост\n");
    cin>>rost;
    printf("Введите вес\n");
    cin>>ves;
    if (rost - 100 > ves)
        printf("ешь больше");
    if (rost - 100 == ves)
        printf("ты идеален :D");
    if (rost - 100 < ves)
        printf("ешь меньше");
    getch();
 
}

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .

Перевести на C++

Решение