1. Ввести два числа, вивести більше.
2. Ввести ціле число. Якщо воно є додатнім, то додати до нього 1; в іншому разі не змінювати його. Вивести отримане число.
3. Ввести ціле число. Якщо воно є додатнім, то додати до нього 1; в іншому випадку відняти від нього 10. Вивести отримане число. Читати далі
29 квітня відбувся фінальний етап онлайнової олімпіади “Lviv IT Challenge”, у якому взяли участь 10 талановитих школярів Львова і області. Всі учасники представили свої проекти – втілені ідеї для “Розумного кварталу” Львова.
18 лютого відбувся ІІ очний етап онлайнової олімпіади з інформаційних технологій Lviv IT Challenge-2017. У ІІІ фінальний етап запрошено учасників, які набрали не менше 4 балів (з 8 можливих), або зробили хоча б одне завдання з програмування. У рамках фінального етапу конкурсу необхідно подати рішення з автоматизації процесів в розумному кварталі Львова http://naukova.com/ (на вибір учасника). Тематика має відповідати гаслу конкурсу.Учасник на власний розсуд додає функції, які вважатиме корисними для кінцевого користувача. Ініціатива – вітається. Також важливими є якість технічної реалізації, дизайн та стиль роботи.
У список фіналістів потрапив учень 10 класу Мацкула Олег.
Роздільська ЗОШ І-ІІІ ст.
Мацкула Олег – І місце Інформатика
Бурій Юра – І місце ІКТ
Завдання ІІ етапу Всеукраїнської
учнівської олімпіади з інформатики 2016
З 20 по 26 жовтня вчитель інформатики Роздільської ЗОШ І-ІІІ ст. Свідрик В.Є. та учень 10 класу Мацкула Олег взяли участь у Всеукраїнській школі з програмування для переможців Міжнародного конкурсу з інформатики та комп’ютерної вправності „Бобер”.
В рамках школи учні та вчителі слухали лекції з програмування, змагалися в інтелектуальних іграх та відвідували цікаві екскурсії.
Найменше спільне кратне (НСК) двох цілих чисел a, b називаємо найменше натуральне число, яке є кратним до обох цих чисел. Позначаємо НСК(a, b), в англомовній літературі LCM(a, b). Отже НСК(a, b) є найменшим натуральним числом, яке ділиться без залишку на обидва числа a, b. Означення можна – очевидним способом – узагальнити на довільну кількість аргументів.
Властивості• НСК(a, b)= НСК(b, a) (перестановка аргументів не змінює НСК).
• НСК(a, b, c, d) = НСК(НСК(a, b), НСК(c, d) )
• НСК(a, b) =|ab|/НСД(a, b), де НСД(a, b) найбільший спільний дільник чисел a, b.
Програма
function NOD(x,y:integer):integer;
Begin
If x<>0 then NOD:=NOD(y mod x,x) else NOD:=y;
End;
function NOK(x,y:integer):integer;
Begin
NOK:=(x div NOD (x,y))*y;
end;
var a:array[1..100] of integer;
n,i:byte;
k:integer;
begin
write(‘Введіть к-сть елементів n=’);
readln(n);
writeln(‘Введіть елементи масиву: ‘);
for i:=1 to n do
begin
write(‘a[‘,i,’]=’);
readln(a[i]);
end;
clrscr;
writeln(‘Масив:’);
for i:=1 to n do
write(a[i],’ ‘);
writeln;
k:=NOK(a[1],a[2]);
for i:=3 to n do k:=NOK(k,a[i]);
writeln(‘НСК елементів=’,k);
readln
end.
НСД(a, b)= НСД(b, a) (перестановка аргументів не змінює НСД).
• 1<=НСД(a, b)<=min(|a|,|b|)
• НСД(a, b, c, d) = НСД(НСД(a, b), НСД(c, d) )
• НСД(a, b) =|ab|/НСК(a, b), де НСК(a, b) найменше спільне кратне чисел a, b.
Програма
function Nod(a,b:integer):integer;{знаходження НСД 2 чисел}
begin
while a<>b do
if a>b then a:=a-b else b:=b-a;
Nod:=a;
end;
var a:array[1..100] of integer;
n,i:byte;
k:integer;
begin
clrscr;
write(‘Введіть к-сть елементів n=’);
readln(n);
writeln(‘Введіть елементи масиву: ‘);
for i:=1 to n do
begin
write(‘a[‘,i,’]=’);
readln(a[i]);
end;
writeln(‘Масив:’);
for i:=1 to n do
write(a[i],’ ‘);
writeln;
k:=Nod(a[1],a[2]);
for i:=3 to n do k:=nod(k,a[i]);
writeln(‘НСД елементів=’,k);
readln
end.
Липівська ЗОШ І-ІІІ ст.
Петров Д
Петров Дмитро – ІІ місце – ІКТ
Роздільська ЗОШ І-ІІІ ст.
Мацкула Олег – ІІ місце Інформатика
