Дистанционная подготовка: задача 1986 налог
задача 1986 налог
от Дмитрий Воронецкий - Среда 25 Декабрь 2013, 20:23
  Почему-то система выдает 0 баллов, хотя у меня работает нормально.

var a, b:integer;
begin
readln(a);
b:=a div 100;
if (a mod 100)>0
then begin
b:=b+1;
end;
writeln(b);
end.
Re: задача 1986 налог
от Peter Cherepanov - Среда 25 Декабрь 2013, 20:42
  У вас есть две проблемы.
1. Тип integer в некоторых версиях Паскаля очень короткий -- 2 байта.
2. Это задача на длинную арифметику (в простейшей форме) и с использованием любых встроенных типов для представления чисел не решается.
Re: задача 1986 налог
от Дмитрий Воронецкий - Среда 25 Декабрь 2013, 21:02
  а что нужно ставить вместо integer? longlint тоже не для всех тестов проходят.
Re: задача 1986 налог
от Peter Cherepanov - Среда 25 Декабрь 2013, 21:28
  Нужно считать число в строку и прибавлять единицу вручную. А можно просто писать на Питоне. Там таких проблем нет.