Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Технологии > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 13.10.2019, 16:11   #1
ZVEZDOKRIK
Новичок
Джуниор
 
Регистрация: 13.10.2019
Сообщений: 1
По умолчанию перевод из Pascal в Си

Здравствуйте, нужно решить данную задачу:
Ввести действительное число а. Найти среди чисел
1, 1 + 1/2, 1 + 1/2 + 1/3, …
первое, большее а. Вывести это число на экран.

Написал код на Си, но он работает неправильно

Код:
#include <stdio.h>
#include <stdlib.h>
#include<math.h>

int main()
{
  int n = 1;
double b = 1.0;
double a;
scanf("%lf",a);
while (b<a)
{
n++;
b=b+(1/n);

}
  printf("%lf", b);

    return 0;
}



написал такой же алгоритм на Pascal и все работает

Код:
var
n:integer;
a,b:real;
begin
readln(a);
b:=1;

while (b<a) do
begin
n:=n+1;
b:=b+(1/n);
end;
write(b);
end.

Подскажите, пожалуйста, где я ошибся?
______________________
Форматируйте код и используйте тег [CODE] (кнопка [CODE] в форме сообщения) при вставке кода на форум. Подробнее в FAQ

Последний раз редактировалось Вадим Мошев; 13.10.2019 в 17:02.
ZVEZDOKRIK вне форума   Ответить с цитированием
Старый 13.10.2019, 17:07   #2
digitalis
Участник клуба
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 1,869
По умолчанию

Код:
scanf("%lf",&a);
digitalis вне форума   Ответить с цитированием
Старый 13.10.2019, 20:17   #3
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 26,232
По умолчанию

сделайте n double

Код:
  double n = 1.0;
double b = 1.0;
а ещё непонятно, почему в Паскале n в начале не иницилизируется единицей.
Тогда и в коде на Си сделайте
Код:
double  n = 0.0;
Serge_Bliznykov вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
перевод с Pascal в С++ Vaas Помощь студентам 0 03.07.2014 17:27
Перевод из Pascal в С Foxtrot_1 Помощь студентам 7 20.06.2009 19:00
Перевод кода из Pascal в Object Pascal zemskov77 Общие вопросы Delphi 1 03.01.2009 10:37


23:06.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.