Задачки паскаль....

[Rpk]

Кто сможет помочь??Нужно уже завтра ко дню...а еще не готово, надо не мне, а мое девушке...я в этом не бум бум.... =((( кто поможет.Задачи нужно сделать на языке Pascal что бы выглядело что делал не профи а нуп.
И еще, там заставили сделать к ним Блок схему =(((( надеюсь на вашу помощь
Вот сами задачи.

1. Дана масса падающего тела. Найти силу удара о землю.
Дана скорость автомобиля, Он проехал 300 км. Найти время пути в минутах.
( линейный алгоритм)

2. Даны три числа посчитать среди них количество отрицательных.
(условно разветвленный It then…else)

3. написать программу, вычисляющую идеальный вес взрослого человека по формуле: идеальный вес = рост – 100, цикл, выход из числа значение роста 250
(цикл с параметром for…to)

4. с помощью while написать программу вычисляющую сумму квадратов нечетных чисел от 1 до 300 включительно
(цикл с предусловием while)

5. составить программу вычисляющую сумму квадратов нечетных чисел от 2 до введенного вами числа N
(цикл с пост условием repeat)


PS.Каждую задачу еще и в определнном действие как подписано в каждом пункте,типа whyle/repeat/ и т.д =(

[Пепел Феникса]

наработки тогда поговорим.
задачи банальные.

[Rpk]

Вы не понимаете, я в этом 0.Я не понимаю вообще как делать...я не учился паскалю.Вы не мне помогаете, а моей девушке =((( Она уже спит...не хочу подвести её :-(

[Arigato]

Сообщение от Rpk

я не учился паскалю.

Самое время приступить.

Сообщение от Rpk

Она уже спит...не хочу подвести её :-(

Во как, барышня спит, а мы тут обязаны пахать всю ночь, решая её задачи. Интересно у вас получается...

[Rpk]

Сообщение от Arigato

Самое время приступить.

Умно...Я что должен сейчас сидеть и ночью учить паскаль???

Сообщение от Arigato

Во как, барышня спит, а мы тут обязаны пахать всю ночь, решая её задачи. Интересно у вас получается...

Так если Вы не разбираетесь в этом и считаете что будете сидеть всю ночь, зачем же тогда писать так?И разве это ваша обязанность?Я кажется просто попросил помочь!
Тогда извините за беспокойство, надеялся на вашу помощь.Сто пудов, в этом деле разбираетесь на 5 балов, а играет дело принципа наверно...либо жалко помочь, либо как русский темперамент - лень...
Ну еще раз извините, раз не можете помочь!

[Arigato]

Сообщение от Rpk

Умно...Я что должен сейчас сидеть и ночью учить паскаль???

Конечно должны, не будить же вашу девушку, что бы она учила. Пусть поспит, а у вас вся ночь впереди

[Rpk]

Сообщение от Arigato

Конечно должны, не будить же вашу девушку, что бы она учила. Пусть поспит, а у вас вся ночь впереди

Вместо того что бы пререкаться просто бы промолчали.Если вам не спится, то мне завтра вставать рано утром...Логику включите и подумайте какой я буду.А сидеть и трепать языком каждый умеет, Вам надо замечание сделать за флуд в теме.Я задал же конкретный вопрос.А вы про то, что я должен делать.Хех, а что самое интересное, Вы отвечаете только на то, что вам нравится?Или просто нечего сказать вот и ответили на то, что хватил объем лексикона?Увы но я не ожидал такого отношения...


Люди есть которые могут помочь или таких здесь можно не искать?


PS.Надеюсь кто-то будет, Arigato, продолжайте дальше..я вас все равно не слушаю.Вы упали в моих глазах.

[Arigato]

Сообщение от Rpk

Люди есть которые могут помочь или таких здесь можно не искать?

Читаем правила раздела: http://programmersforum.ru/announcement.php?f=31

1. Изначально слово "помощь" подразумевает под собой направление на верный путь, нахождение верного решения;
...
3. Все темы которые можно отнести к ряду "Я все знаю, но код написать не могу" и "Что-то непонятно, лучше дайте исходник" будут либо удалены, либо перемещены в соответствующий раздел.

Так что вашей теме самое место в разделе Фриланс, а не Помощь студентам, т.к. вам нужна не помощь, а готовое решение.

[profi]

Вот 5-я задача:

uses crt;
var
   n,i:integer;
   sum:real;
begin clrscr;
write('n=');
readln(n);
sum:=0;
i:=2;
repeat
      if i mod 2 <> 0 then
        sum:=sum+sqr(i);
      inc(i);
until i>n;
writeln('summa=',sum);
end.

Обращайтесь в раздел "Фриланс".

[LeBron]

В шею этого новичка за нарушение правил форума. Нету наработок - нету ничего. Rpk, с одной стороны - Ваш случай, с другой - случаи кучи других юзеров, не знающих паскаль. Где провести черту между теми, кому надо помогать, и теми, кому не надо? Во фрилансе ваша тема имеет право жить, в этой ветке - имеет с точки зрения части людей, но не имеет с точки зрения правил.
P.S. для написания данных задач необходимо прочесть приблизительно 10 страниц самого примитивного учебника "для чайников-ниовичков-отстающих". Если Вам лень - значит это Ваша проблема.