ЗМАГАННЯ ЗАВЕРШЕНО
Проект Олександра
Конкурс:
Онлайн-конкурс "Pascal"
Номінація:
Pascal
Автор:
Олександр Братусь
Команда:
"Юний програміст" Центру ТТМ
ЗАВДАННЯ 1

Поміняти місцями значення двох цілих змінних, не використовуючи додаткової змінної.


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 2

Ввести чотирьохзначне число і визначити:

а)суму його цифр

б)першу цифру замінити на модуль різниці першої та останньої цифри та вивести замінене число.

в) вивести число у зворотному порядку.


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 3

Обчислити площу трикутника за формулою Герона. Значення сторін ввести з клавіатури.


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 4

Скласти програму обчислення площі рівностороннього трикутника за відомою довжиною його сторони.


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 5

Обчислити куб суми двох цілих чисел.


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 6

Написати програму переведення секунд у відповідне їм значення повних годин, хвилин та секунд.


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 7

Визначити h – повну кількість годин та m– повну кількість хвилин, які пройшли від початку доби до того моменту, коли годинникова стрілка повернулась на f градусів. (f– дійсне число [0...360])


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 8

Обчислити значення квадратного тричлена Ax^2+Bx+C, коефіцієнти якого та значення змінної x вводяться за допомогою клавіатури.


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 9

Обчислити n-ий член арифметичної прогресії, якщо відомі її перший член та різниця.


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 10

Знайти площу круга, обмеженого цим колом. (Довжина кола вводиться з клавіатури)


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 11

Виконати посередині напис Turbo Pascal, щоб він мав вигляд такий, як показано на малюнку.

Завдання 11


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 12

Змінна а- випадкова величина дійсного типу з діапазону [0..5).

Необхідно вивести таким чином результат (Наприклад, якщо а=4.648, то на екран вивести: 4+0.648=4.648)


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 13

Між трьома країнами розділили m комп'ютерів у відношенні 4:7:5. (m - будь-яке ціле число, що вводиться з клавіатури). Скільки комп'ютерів одержала кожна країна?


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ЗАВДАННЯ 14

Припустимо, що ви отримали у спадок n гривень (n - будь-яке ціле число, що вводиться з клавіатури). Ви вирішили жити на 1200 грн у місяць. Визначити на скільки років вам вистачить цього спадку. 


ОПИС РОБОТИ:
Опис результатів
Новий додаток Новий додаток

ОБГОВОРЕННЯ:
2012-10-25 15:40 Адміністратор:
Доброго дня, шановні учасники! Сьогоднішній конкурс помітно відрізнятиметься від минулих конкурсів 2-ого рівня. Основна відмінність в тому, що в цьому конкурсі буде поставлена велика кількість відносно простих завдань, а також обмежений час до мінімуму. Тривалість цього конкурсу - усього 1.5 години. Тому переможуть ті, хто вміє не просто програмувати, а робити це швидко та з якомога меншою кількістю помилок.
2012-10-25 15:42 Адміністратор:
Тому цінуйте кожну секунду свого часу.
2012-10-25 15:47 Владислав Урсул:
)))))
2012-10-25 15:50 Адміністратор:
Нагадую основні інструкції - для того, щоб прикріпити роботу до завдання, необхідно на сторінці свого проекту перейти в режим редагування (натиснути на олівець в правому верхньому кутку). Після цього під кожним завданням з`являться олівчики для завантаження .pas файлів. Після того, як файл завантажився, рекомендується перевірити коректність завантаження - для цього збережіть його назад на свій комп`ютер та перегляньте зміст.
2012-10-25 15:52 Адміністратор:
Якщо щось не виходить - пишіть у цю стрічку коментарів, ми постараємося вам оперативно допомогати.
2012-10-25 15:53 Владислав Урсул:
сколько людей участвует по факту?
2012-10-25 15:54 Адміністратор:
Конкурс іще не розпочався, а тому немає ніякого факту :)
2012-10-25 15:57 Владислав Урсул:
логично
2012-10-25 15:59 Максим Заяц:
питання по оформленню: запис програми стандартний? ввод/вивод в просто так или в файл? FreePascal можно використовувати замість турбо?
2012-10-25 16:00 Адміністратор:
Хочу також нагадати, що для нарахування IT-балів, які можна конвертувати в Призи, на вашій сторінці обов`язково повинна бути вказана дата народження. У багатьох учасників до цього часу стоїть дата 00-00-0000. Якщо до моменту оголошення результатів дата не зміниться, ці учасники йтимуть поза конкурсом.
2012-10-25 16:00 Адміністратор:
Ввод-вивод - через консоль, не обов`язковов файл. Щодо FreePascal - необхідний коментар судді.
2012-10-25 16:01 Прасковья Теребий:
бажано використовувати Turbo Pascal.
2012-10-25 16:08 Іван Франчук:
А все ж таки можна Free?
2012-10-25 16:10 Прасковья Теребий:
якщо не має турбо, то вирористовуй фри. лише, коли будеш виводити дійсні числа, то задавай їм формат.
2012-10-25 16:11 Максим Заяц:
питання - у №1 і в подібних потрібно вводити/виводити значення змінних?
2012-10-25 16:11 Владислав Урсул:
А надо писать ограничения?
2012-10-25 16:11 Владислав Урсул:
например чтобы не было 5-ти значный чисел когда надо 4
2012-10-25 16:12 Іван Франчук:
Скажіть будь ласка задача 2, там треба самому вводити чотирьохзначне число чи ви будете це робити???
2012-10-25 16:13 Прасковья Теребий:
Владислав, это ЛИНЕЙНЫЕ программы. думаю выод ты понял сам. Иван, число вводится с клавиатуры
2012-10-25 16:14 Прасковья Теребий:
Максим, все данные вводятся пользователем не в теле программы, а при её запуске
2012-10-25 16:14 Владислав Урсул:
значит нет.
2012-10-25 16:19 Олександр Братусь:
Не можу завантажити вже готові програми =(
2012-10-25 16:23 Адміністратор:
Олександре, перейти в режим редагування виходить? На якому етапі помилка?
2012-10-25 16:25 Адміністратор:
В самому крайньому випадку, якщо не вдається завантажити свої програми - до закінчення конкурсу необхідно відправити архів з програмами на пошту info@it-arena.org.
2012-10-25 16:27 Олександр Братусь:
Дякую, вже можу. Просто не було олівця спочатку, як звичайно.
2012-10-25 16:28 Максим Заяц:
А де в завданні 11 малюнок?
2012-10-25 16:29 Адміністратор:
Зайди на вкладку Завдання - там є малюнок. Це наш недогляд, виправимо пізніше.
2012-10-25 16:29 Прасковья Теребий:
малюнок під завданням 11. натискаєш на нього мишкою і він збільшується
2012-10-25 16:30 Максим Заяц:
нема=(
2012-10-25 16:31 Адміністратор:
Максиме - зверху зліва є кнопка ЗАВДАННЯ. Натисни на неї.
2012-10-25 16:31 Максим Заяц:
ви можете відправити малюнок на цю сторінку http://vk.com/goldkiller000?
2012-10-25 16:32 Антон Адамів:
Куди здавати програми?
2012-10-25 16:32 Прасковья Теребий:
2012-10-25 18:50 Адміністратор: Нагадую основні інструкції - для того, щоб прикріпити роботу до завдання, необхідно на сторінці свого проекту перейти в режим редагування (натиснути на олівець в правому верхньому кутку). Після цього під кожним завданням з`являться олівчики для завантаження .pas файлів. Після того, як файл завантажився, рекомендується перевірити коректність завантаження - для цього збережіть його назад на свій комп`ютер та перегляньте зміст.
2012-10-25 16:34 Адміністратор:
Максиме, малюнок можна завантажити також за адресою http://it-arena.org/files/photo/avatar/full/turbo-pascal-2585.png
2012-10-25 16:36 Антон Адамів:
Можна загружати *.txt з кодом?
2012-10-25 16:37 Адміністратор:
Завантажуй файли .pas
2012-10-25 16:43 Прасковья Теребий:
Сергій Ярема, ти не завантажив файли з розширенням pas. Я не зможу оцінити їх в певній мірі.
2012-10-25 16:47 Сергій Гіденко:
я не понял суть 10 задания
2012-10-25 16:48 Прасковья Теребий:
Серёжка Гиденко, подумай. там написано, що вводиться і що треба знайти
2012-10-25 16:53 Максим Заяц:
а можно ссилку на №10
2012-10-25 16:54 Іван Франчук:
завдання 6, як виводити значення??? так: а,`годин`,` `,в,`хвилин`,` `,с`секунд`?????? так?
2012-10-25 16:54 Прасковья Теребий:
ЗАВДАННЯ 10 Знайти площу круга, обмеженого цим колом. (Довжина кола вводиться з клавіатури)
2012-10-25 16:55 Прасковья Теребий:
Іван Франчук, так.
2012-10-25 16:55 Іван Франчук:
дякую
2012-10-25 16:59 Прасковья Теребий:
Адміністраторе, скажіть, будь ласка, яка кількість активних учасників на даний момент?
2012-10-25 17:00 Адміністратор:
Можу лише сказати, що хоча б один файл завантажило 13 чоловік.
2012-10-25 17:02 Максим Заяц:
можете дати ссилку на картинку з №10
2012-10-25 17:03 Адміністратор:
Картинки в завданні №10 немає
2012-10-25 17:03 Прасковья Теребий:
Адміністраторе, дякую. Максим, там немає малюнка. це умова задачі
2012-10-25 17:08 Максим Заяц:
а як зрозуміти "обмеженого колом"? просто знайти площу кругу?
2012-10-25 17:11 Прасковья Теребий:
при перевірці програм буду брати до уваги, який діалог проводить програма з користувачем, маштабність Вашої програми(якщо її можна скоротити шляхом зменшення змінних, то краще виконайте це)
2012-10-25 17:11 Прасковья Теребий:
Максим Заяц, виконуй як вважаеш правильним.
2012-10-25 17:16 Адміністратор:
У когось є проблеми з підключенням файлів до своїх завдань?
2012-10-25 17:21 Прасковья Теребий:
шановні учасники, читайте уважно умови задач
2012-10-25 17:26 Антон Адамів:
Відносно завдання 11. Пропоную його зняти, так як воно не відкривається.
2012-10-25 17:27 Прасковья Теребий:
Як у вас успіхи? є ті, що вже завершили всі задачі? і яка кількість максимально вирішених задач?
2012-10-25 17:28 Прасковья Теребий:
Anton AD, відкрий посилання http://it-arena.org/files/photo/avatar/full/turbo-pascal-2585.png
2012-10-25 17:28 Антон Адамів:
Є, блін!!! Я його вже не встигну написати(((
2012-10-25 17:29 Адміністратор:
Або перевантаж сторінку.
2012-10-25 17:29 Антон Адамів:
Але дякую за силку. Хоч побачив його на остаток)
2012-10-25 17:29 Владислав Урсул:
блин не успел сделать 13
2012-10-25 17:29 Владислав Урсул:
итого у меня 10 задач
2012-10-25 17:30 Адміністратор:
Вітаю усіх учасників із завершенням змагання! Які Ваші враження від конкурсу? Чи були якісь технічні проблеми?
2012-10-25 17:31 Максим Заяц:
коли приблизно будуть результати?
2012-10-25 17:31 Антон Адамів:
Мені надзвичайно прикро за 11-у задачу. Я її міг зробити, але отримав силку на малюнок тільки кілька секунд до кінця. Пропоную вкінці завдання дописувати силку на рисунок в явному вигляді.
2012-10-25 17:32 Олександр Сторожук:
Получилось всего 12 задач. (не сделал 11 и 13). Остальные сделал, но не факт что верно :)
2012-10-25 17:32 Адміністратор:
Результати стануть доступними в понеділок о 18:00.
2012-10-25 17:32 Олександр Сторожук:
Максим Заяц, ввверху счетчик запустился.
2012-10-25 17:33 Жека Колесник:
ех все б добре але невстиг 2 завдання зробити...(
2012-10-25 17:34 Владислав Урсул:
А сколько людей участвовало?
2012-10-25 17:34 Прасковья Теребий:
посилання на малюнок було надруковано у чаті адміністратором о 19:34. був час його виконати
2012-10-25 17:34 Владислав Урсул:
по факту))))
2012-10-25 17:35 Олександр Братусь:
Задач надзвичайно багато, одну, на жаль, не встиг доробити, проте враження від конкурсу чудові=)
2012-10-25 17:36 Roman Shapovalov:
Женя я вообще ничего толком не сделал
2012-10-25 17:36 Прасковья Теребий:
всіх вітаю з закінченням олімпіади та чекаю вас на наступних етапах конкурсу. мої враження від ваших програм ви дізнаєтесь, коли будуть опубліковані результати.
2012-10-25 17:37 Прасковья Теребий:
до речі, всі бачили, що необхідно заповнити дані про дату народження?
2012-10-25 17:38 Жека Колесник:
Роман так час швидко пролетів, я й незамітив як олімпіада закінчилась)
2012-10-25 17:38 Максим Заяц:
что-то мне кажется, что "враження" от моих программ будут очень и очень плохие ......
2012-10-25 17:38 Roman Shapovalov:
угу!
2012-10-25 17:39 Адміністратор:
До речі, усі учасники вже можуть переглянути роботи своїх товаришів.
2012-10-25 17:39 Максим Заяц:
а почему я теперь открываю свои загружение файлы и там текст программы изменился?
2012-10-25 17:40 Адміністратор:
І ще зауваження постфактум - потрібно було завантажувати не exe файли, а .pas - файли.
2012-10-25 17:42 Адміністратор:
Максиме, наприклад, який файл у якому завданні?
2012-10-25 17:44 Максим Заяц:
у багатьох
2012-10-25 17:46 Адміністратор:
Потрібен конкретний приклад - назву файла, і що змінилося.
2012-10-25 17:46 Максим Заяц:
№3 наприклад
2012-10-25 17:47 Максим Заяц:
ввід та вивід
2012-10-25 17:48 Максим Заяц:
чи можливо я щось плутаю? можливо це правильні відповіді?
2012-10-25 17:49 Максим Заяц:
також додатий модуль CRT якого я не використовував
2012-10-25 17:51 Адміністратор:
Усім учасникам, хто іще на місці - вишліть будь-ласка архіви з своїми програмами на пошту it-arena.org для контролю
2012-10-25 17:51 Адміністратор:
В листі вкажіть будь-ласка своє ім`я
2012-10-25 17:52 Адміністратор:
На пошту info@it-arena.org
2012-10-30 20:53 Виктор Данилюк:
Почему отсутствует оценка большинства работ, включая мою?
2012-10-31 21:19 Адміністратор:
Вікторе, усі роботи оцінені окрім Вашої. Ваша робота була пропущена випадково. Щодо інших робіт без оцінок - це пусті проекти. Тобто учасники підтвердили, але не взяли участі. Вітаємо Вас з 3-ім місцем!