ENG  RUSTimus Online Judge
Online Judge
Задачи
Авторы
Соревнования
О системе
Часто задаваемые вопросы
Новости сайта
Форум
Ссылки
Архив задач
Отправить на проверку
Состояние проверки
Руководство
Регистрация
Исправить данные
Рейтинг авторов
Текущее соревнование
Расписание
Прошедшие соревнования
Правила
вернуться в форум

Обсуждение задачи 1068. Сумма

What is wrong??? Pascal
Послано mahone 12 фев 2011 23:17
var
a:array[1..10000]of integer;
n,i,d,s:integer;
begin
read(n);
for i:=1 to n do
if abs(n)<10000 then
if n<=0 then d:=-1
else
d:=1;

S:=((2+(n-1)*d)*n div 2 ));

write(s);
end.



(12,26) Fatal: Syntax error, ";" expected but ")" found
Re: What is wrong??? Pascal
Послано B-S42#-1Shipulin 13 фев 2011 08:46
Your wrong in:
S:=((2+(n-1)*d)*n div 2 ));

I think right:
S:=((2+(n-1)*d)*n div 2);