Вопросы и ответы по работе с системой и мероприятиям, проводимым на портале

Задача 2.1 Линейные программы Задачник

 
Изображение пользователя Еськов Алексей Владимирович
Задача 2.1 Линейные программы Задачник
от Еськов Алексей Владимирович - Monday, 10 September 2018, 01:46
 

Здравствуйте почему выдает ошибку, локально все решает. Проверял и PascalABC b FreePascal

var N,a,b,c,d,e:integer;

y,x:text;

begin

Assign(y,'input.txt');

reset(y);

Assign(x,'output.txt');

read(y,N);

rewrite(x);

b:=N div 100;

c:=(N mod 100) div 10;

d:=N mod 10;

e:=b+c+d;

a:=b*c*d;

writeln(x,e);

write(x,a);

close(x);

close(y);

end.

Изображение пользователя Лапшева Елена Евгеньевна
Re: Задача 2.1 Линейные программы Задачник
от Лапшева Елена Евгеньевна - Monday, 10 September 2018, 11:47
 

Спасибо, мы посмотрим, в чем дело.

Изображение пользователя Лапшева Елена Евгеньевна
Re: Задача 2.1 Линейные программы Задачник
от Лапшева Елена Евгеньевна - Tuesday, 11 September 2018, 11:56
 
Алексей Владимирович! Это были проблемы сервера. Теперь все должно быть нормально.
Изображение пользователя Еськов Алексей Владимирович
Re: Задача 2.1 Линейные программы Задачник
от Еськов Алексей Владимирович - Saturday, 15 September 2018, 02:14
 

Спасибо за оперативность Елена Евгеньевна.