ENG
RUS
Timus Online Judge
Online Judge
Задачи
Авторы
Соревнования
О системе
Часто задаваемые вопросы
Новости сайта
Форум
Ссылки
Архив задач
Отправить на проверку
Состояние проверки
Руководство
Регистрация
Исправить данные
Рейтинг авторов
Текущее соревнование
Расписание
Прошедшие соревнования
Правила
вернуться в форум
Обсуждение задачи
1820
. Уральские бифштексы
Pascal Compilation error. Why?
Послано
Michael
20 авг 2013 16:38
It works on my laptop! I have Pascal ABC.
var a,b,c:integer;
begin
readln(a,b);
if a>b then c:=ceil(2*a/b) else c:=2;
write(c);
end.
© 2000–2024
Timus Online Judge Team
. Все права защищены.