Школа программиста

Забыли пароль?
[задачи] [курсы] [олимпиады] [регистрация]
Логин:   Пароль:    
Скрыть меню
О школе
Правила
Олимпиады
Фотоальбом
Гостевая
Форум
Архив олимпиад
Архив задач
Состояние системы
Рейтинг
Курсы
Новичкам
Работа в системе
Курсы ККДП
Дистрибутивы
Статьи
Ссылки


 
Вернуться
Тема: Не успел сдать задачу лишь по 1-ой причине: Compilation Error. Пока понял что не нужно было подключать модуль Crt время уже кончилось. Но задача то решена полностью правильно... Проверьте в чем ошибка компиляции и исключив ошибку проверьте задачу...
1
  1  Снетков Михаил Сергеевич, 13 декабря 2008 г. 17:13:10
      2Sexy boy: Бывает, что без этого не работает.
2Илья: насколько я знаю - это ваши проблемы :) Написано, что компилятор Delphi и вас об этом должны были оповестить.
  2  sexy boy, 07 декабря 2008 г. 15:36:52
      Блин я не понимаю что вы пишите close(input);close(output); когда можно без этого, или это даёт новые возможности???
  3  Блохин Илья Андреевич, 07 декабря 2008 г. 13:23:41
      Дак ясно что с файлами работать нужно.. Все правильно было сделано)) я усебя на компьютере компилировал потом запускал программу, дак она правильно работает..
  4  Нагин Сергей Юрьевич, 06 декабря 2008 г. 17:59:29
      надо с файлами работать! вот пример задачи :
var a:longint;
begin
assign(input,'input.txt');reset(input);
assign(output,'output.txt');rewrite(output);
readln(a);
if a=0 then writeln(1);
if a>0 then writeln((a+1)*a div 2);
if a<0 then writeln(-((a+1)*a div 2 - 1));
close(input);close(output);
end.
1

Чтобы оставить сообщение необходимо зарегистрироваться и авторизоваться!

Красноярский краевой Дворец пионеров, (c)2006 - 2026, ИНН 246305493507, E-mail: admin@acmp.ru