без массива:
program n_1;
var a, b, i, n: integer;
begin
a: =0; b: =0;
for i: =1 to 15 do begin
read(n);
if n mod 2 = 1 then a: =a+1
else b: =b+1;
end;
if a> b then writeln('нечетных чисел больше, чем четных')
else writeln('четных чисел больше, чем нечетных');
end.
с массивом:
program n_1;
var a, b, i:
integer; n: array [1..15] of integer;
begin
a: =0; b: =0;
for i: =1 to 15 do begin
read(n[i]);
if n[i] mod 2 = 1 then a: =a+1
else
b: =b+1;
end;
if a> b then writeln('нечетных чисел больше, чем четных')
else writeln('четных чисел больше, чем нечетных');
end.
но честно, не вижу смысла использовать массив.
так-с, на прикладной информатике было следующее:
1. методы оптимизации - линейное программирование, транспортная и т. д.
3. web-дизайн - у нас было скорее интернет-программирование, писали на php.
4. базы данных - в основном на ms access и sql сервер, но
был факультатив по mysql
5. безопасность жизнедеятельности - стандартная техника безопасности на рабочем месте
6. вычислительная - или численные методы, в принципе одно и то же.
8. дискретная - честно, ничего не вспоминается капитально
9.
дифференциальное счисление - производные, интегралы, дифуры
10. защита информации - или информационная безопасность, рассматривали способы защиты информации, как внутри пк, так и за его пределами
12. иностранный язык - no comments
14. информатика -
рассматривали на нахождение наименьшего пути, изучали графы и т. д. (что странно, у следующих студентов был курс excel)
15. информационные технологии - разрабатывали формы документов
16. исследование операций - в общем, примерно то же самое, что и в мо
17. россии
- в основном 19 век
20. 2 ( анализ) - включала в себя диф. исчисление
28. операционные системы - работали на linux
32. программирование - c#
37. язык делового общения
39. системы искусственного интеллекта - пролог
41.
социология и политология
43. теория вероятностей, статистика - нормальное распределение до сих пор не могу забыть
47. - 1 семестр, в основном изучали электромагнетизм
48. культура
49. философия
51. экология
53. предприятия
Поделитесь своими знаниями, ответьте на вопрос:
Глаза воспринимают световые сигналы, которые обрабатывает преобразуя в