13 Виконайте навчальний проект на одну із запропонованих тем: 1) Комп'ютер майбутнього: перші кроки чи далекі перспективи
3) Вікісайти, основи конструювання та приклади застовувань
2) Редактори комп'ютерної графіки: нові інструменти для майбутнього художника
4) Офіс 365: сховище чи онлайнові офісні програми
5) 3D-моделювання, програми та реалізація
ПРИМІТКА. Детальний опис виконання завдання 12 можна знайти у підручнику
Інформатика: підручник для 9 класу/ Н.В. Морзе, О.В. Барна, В.П. Вембер. – К.: УОВЦ
з 10 цілих чисел.
кий пошук для визначення, чи є вказане значення серед елементів ЛІН
*Примітки! ЗАВДАННЯ у викоНАТИ У ПРОГРАМI LAZARUS (будь-яка версія),
ЗАВДАННЯ 13 ВикоНАТИ У ПРОГРАМ MICROSOFT OFFICE POWER POINT (будь-яка
«Оріон»,
версія)
В целях удовлетворения этих потребностей органы государственной власти и органы местного и регионального самоуправления создают информационные службы, системы, сети, базы и банки данных.
Порядок их создания, структура, права и обязанности определяются Кабинетом Министров Украины или другими органами государственной власти, а также органами местного и регионального самоуправления.
begin
writeln('Дано уравнение вида ax^2+bx+c=0');
Writeln ('Укажи переменную "a"');
readln(a);
Writeln ('Укажи переменную "b"');
readln(b);
Writeln ('Укажи переменную "c"');
readln(c);
if a = 0
then writeln('Не квадратное уравнение!')
else begin
d:= sqr(b)-4*a*c;
if d < 0 then writeln('Нет корней')
else begin
x1:= (-b+sqrt(d))/2*a;
x2:= (-b-sqrt(d))/2*a;
writeln ('X1 =',x1,' X2 =',x2);
end;
end;
end.