8 июня 2011 8.06.11 20 2206

Нужен зачет

+9

Для зачета по информатике нужно написать несколько програм, которые должны будут решать задачи. Делать всё нужно через паскаль. Я пары по изучению этих тем пропустил, а препод обьяснять не хочет. Вот прошу помощи у вас друзья. Напишите пожалуйста мне программы которые решили бы эти задачи:

2)Даны три целых числа. Найти количество положительных и количество отрицательных чисел в исходном наборе.

3)Арифметические действия над числами пронумерованы следующим образом: 1 — сложение, 2 — вычитание, 3 — умножение, 4 — деление. Дан номер действия N (целое число в диапазоне 1–4) и вещественные числа A и B (B не равно 0). Выполнить над числами указанное действие и вывести результат.

4)Дано вещественное число — цена 1 кг конфет. Вывести стоимость 0.1, 0.2, …, 1 кг конфет.

5) Дано целое число N (> 0), являющееся некоторой степенью числа 2: N = 2K. Найти целое число K — показатель этой степени.

6)Дано целое число N и набор из N пар чисел (m, v) — данные о массе m и объеме v деталей, изготовленных из различных материалов. Вывести номер детали, изготовленной из материала максимальной плотности, а также величину этой максимальной плотности. Плотность P вычисляется по формуле
P = m/v.

.заранее большое спс тому/тем кто сможет помч. Тему создал в полевых условиях с телефона.


Лучшие комментарии

Блин вспомнилась олимпиада по информатике которая проходила на листочках и нужно было на нем написать алгоритм создание проги к подобной задаче.)
Когда-то пытался учить языки программирования. Немного учил паскаль, но решил, что пхп для меня нужнее и на него перешёл (а потом вообще забросил). Я хз, но первая вроде так должна решаться (не помню, что делает мод, а что див и нужны ли они тут вообще :D ). Работает правда только на целых числах(если вообще работает как надо).

program first;
var a,b,c: integer;
begin
WriteLn('Vvedi dlinu otrezka A');
Readln(a);
Writeln('vvedi dlinu otrezka B');
readln(b);
c := a mod b;
writeln('Ostanetco ',c);
readln;
end.
1)берешь тупо А мод Б
2)берешь 2 переменных, потом if'ом прогоняешь числа на >0 <0, ну и делаешь инкремент соответсвующей переменной и выводишь…
3)выборка case'ом или что там в паскале… можно через if, но уныло…
4)тупо for'ом прогоняешь умножение на i, типа
for (i=0; i<=1; i+=0,1)
{k=цена_за_кг*i; cout<<k;}
5)обычный логарифм с основанием 2)
6)через массив элементарно решается)… for'ом берешь массив, вбиваешь массу/объем, делишь, загоняешь значение в i'ый элемент массива… потом поиск максимального значения и вывод…

кароче сорри, я ленивый)
пхп шляпа, хоть и популярна до усрачки)… я блин всё хочу асм нормально выучить и нормально программировать микроконтроллеры, а то всё коряво работает)
Сам алгоритм то я могу расписать. Но у меня проблема, как у комрада skailz — синтаксиса не помню.
мне именно это надо
на листочках и нужно было на нем написать алгоритм создание проги к подобной задаче.)
ток не на листочках а под спойлер например, в общем чтоб скопировать можно было и преподу сдать
сегодня одну программу приняли) большее спс прошу ешё немного помочь теперь)
ох блин… паскаль… так бы и помог, только синтаксис нефига не помню) вот писал бы ты на с# или на крайняк питоне…
хоть что нибудь из этого сделать сможешь?
И ещё: задачки то плёвые, ты что весь год/семестр/полсеместра делал то?
ты вообще можешь помочь, не? если плёвые так сделай.
сделай хотя бы два или три последних, очень очень благодарен буду) просто очень надо.
да так-то все могу, синтаксиса нихера не помню, говорю же)
Читай также