Форум
» Назад на решение задач по физике и термеху
Регистрация | Профиль | Войти | Забытый пароль | Присутствующие | Справка | Поиск

» Добро пожаловать, Гость: Войти | Регистрация
    Форум
    Информационные технологии
        Составить циклическую программу в pascal
Отметить все сообщения как прочитанные   [ Помощь ]
» Добро пожаловать на форум "Информационные технологии" «

Переход к теме
<< Назад Вперед >>
Одна страница
Модераторы: paradise, KMA
  

Sunday


Новичок

Здраствуйте, не получается составить синтаксис программы

Не хочет программа работать, подскажите пожалуйста грамотный код

Всего сообщений: 2 | Присоединился: декабрь 2010 | Отправлено: 9 дек. 2010 22:30 | IP
paradise


Долгожитель

var
  k, m, x: integer;
  sum: real;
begin
    read(k);
    read(x);
    sum:=0;
    for m:=1 to k do
    begin
         sum:=sum + (exp(m)+ln(x))/(m*power(x,3));
         writeln(sum:3:3);
    end;
end.

Всего сообщений: 428 | Присоединился: ноябрь 2008 | Отправлено: 10 дек. 2010 0:05 | IP
Sunday


Новичок

Спасибо! Но оказалось, что я правильно писал - просто работал в 64 битной семерке в free paskal IDE. В простом паскале все почему то заработало)

Всего сообщений: 2 | Присоединился: декабрь 2010 | Отправлено: 10 дек. 2010 19:06 | IP

Эта тема закрыта, новые ответы не принимаются

Переход к теме
<< Назад Вперед >>
Одна страница

Форум работает на скрипте © Ikonboard.com