Тема закрыта!Всем привет. Сложилась такая ситуация, что некий студент, то есть я, до конца этой недели должен оформить (решить) 7 задач по языку Паскаль, либо армия меня уже ждет 
В общем сам я разбираюсь в этом, но помощь все же мне нужна. Кто готов бесплатно за спасибо помочь обойти билет в армию?
Jahak, Пункт 2.7
Хочешь об этом поговорить - личка открыта.
Ребят, без лишних вопросов, просто помогите, у кого знания есть в этой области.
Задачи напишу завтра, когда за ПК сяду, они у меня в .pdf файле.
Просто хотел заранее узнать может кто помочь или нет, чтобы зря время не терять.
Файл: http://upwap.ru/3183927
Задачи:
If5
If27
Case15
For10
While9
Proc18
Array2
Matrix27
File15
Если кому-то так неудобно, то завтра скину задачи постом, а не так.
[мошенник] If5 легкая условие когда например a < 1 или когда a>1 выводим в 2 счетчики и все
Мне бы кусками кода, я так быстрее разберусь)
Задачи:
-------------------------------
If5. Даны три целых числа. Найти количество положительных и количество
отрицательных чисел в исходном наборе.
-------------------------------
If27. Для данного вещественного x найти значение следующей функции f,принимающей значения целого типа:
0, если x < 0,
f (x) = 1, если x принадлежит [0, 1), [2, 3),....,
¡1, если x принадлежит [1, 2), [3, 4),....
-------------------------------
Case15. Мастям игральных карт присвоены порядковые номера: 1 — пики, 2 — трефы, 3 — бубны, 4 — червы. Достоинству карт, старших десятки, присвоены номера: 11 — валет, 12 — дама, 13 — король, 14 — туз. Даны два целых числа: N — достоинство (6 · N · 14) и M — масть карты (1 · M · 4). Вывести название соответствующей карты вида «шестерка бубен», «дама червей», «туз треф» и т. п.
-------------------------------
For10. Дано целое число N (> 0). Найти сумму 1 + 1/2 + 1/3 +.... + 1/N (вещественное число).
-------------------------------
While9. Дано целое число N (> 1). Найти наименьшее целое число K, при котором выполняется неравенство 3K > N.
-------------------------------
Proc18. Описать функцию CircleS(R) вещественного типа, находящую площадь круга радиуса R (R -вещественное). С помощью этой функции найти площади трех кругов с данными радиусами. Площадь круга радиуса R вычисляется по формуле S = П*R^2. В качестве значения П использо-
вать 3.14
-------------------------------
Array2. Дано целое число N (> 0). Сформировать и вывести целочисленный массив размера N, содержащий степени двойки от первой до N-й: 2, 4, 8, 16,....
-------------------------------
Matrix27. Дана матрица размера M £ N. Найти максимальный среди минимальных элементов ее строк.
-------------------------------
File15. Дан файл вещественных чисел. Найти сумму его элементов с четными номерами.
-------------------------------
Изм. 1 раз. / Посл. изм. (19 июн 2013, 11:31)
