1 Тема від MiniProger Востаннє редагувалося Cyan (27.09.2014 18:21:55)

  • MiniProger
  • Користувач
  • Поза форумом
  • Звідки: Вінниця
  • Дата реєстрації: 21.09.2014
  • Повідомлень: 8
    • Репутація: 0

Тема: Як перевести з мови паскаль на С++

Допоможіть перевести таку задачку  на мову С++
Задача 1.
За номером року з інтервалу від 1001 до 9999 визначити, високосний він чи ні. Як відомо, високосний — це рік, номер якого ділиться на 4, але не ділиться на 100. Його номер також має ділитися на 400.

VAR       rik : 1001..9999;
BEGIN
              Write(‘Який рік бажаєте перевірити?');
              readln(rik);
              if (rik mod 4=0) and (rik mod 100<>0) or (rik mod 400=0) then
                               writeln(rik:4,’ - високосний рік’)
else writeln(rik:4,' – не високосний рік’)

Cyan: зверніть увагу на тег [ code]

2 Відповідь від FakiNyan Востаннє редагувалося FakiNyan (27.09.2014 18:19:59)

  • FakiNyan
  • FakiNyan
  • Робітниця.
  • Поза форумом
  • Дата реєстрації: 27.06.2013
  • Повідомлень: 14 091
    • Репутація: 5658

Re: Як перевести з мови паскаль на С++

int rik;

    std::cin >> (int)rik;

    if (rik<1001 || rik>9999)
        return 0;

    if (rik % 4 == 0 && rik % 100 != 0 || rik % 400 == 0)
        std::cout << rik << " visokosniy rik" << std::endl;
    else
        std::cout << rik << " ne visokosniy rik" << std::endl;

написав з голови, не перевіряючи, та й паскаля я не знаю :3

Подякували: MiniProger1

3 Відповідь від MiniProger

  • MiniProger
  • Користувач
  • Поза форумом
  • Звідки: Вінниця
  • Дата реєстрації: 21.09.2014
  • Повідомлень: 8
    • Репутація: 0

Re: Як перевести з мови паскаль на С++

Ооо велике спасибі!