Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   [решено] Помощь с паскалем (http://forum.oszone.net/showthread.php?t=154535)

-Marshall- 26-10-2009 18:39 1253064
Помощь с паскалем
 
Вложений: 1
Помогите сделать пожалуйста лабораторную работу для зачета, буду благодарен за помощь :)

lxa85 26-10-2009 20:15 1253142
Нет. Это задача троешника. Условия, циклы проходили? Проходили. Берем конспект лекций и вперед. (В крайнем случае - любую книгу по программированию)
Все необходимо в задаче есть. Различных оговорок и поправок вносить просто некуда. Прям бери и пиши.
Сложно сразу в коде? Тогда словами. Берем А, делим на В, умножаем на С, делаем следующий шаг и т.д.
Получится словами, уже хорошо. Потом берем слова и заменяем русские слова на слова и конструкции языка.
Удачи! :)

-Marshall- 26-10-2009 20:35 1253171
Та дело в том, что я сделал, но не знаю, чего не выполняется :(
Код:
program x3;
var a1,b,ai:real;
i,n :integer;
begin
writeln('Введите число');
readln(b);
if b<0 then
writeln('число меньше ноля')
else
begin
a1:=b;
n:=1;
for i:=2 to n+i do
begin
while ai<0 do
begin
ai:=(ai-1)-1/Sqrt(1);
writeln(ai);
end;
end;
end;
end.

Drongo 26-10-2009 21:11 1253204
-Marshall-, Небольшой совет, делайте отступы в блоках\условиях, так будет легче читать код. Иначе многие специалисты, просто не утрудят себя "ломанием" глаз чтобы прочитать не читабельный код. Понимаете? :)

lxa85 26-10-2009 21:13 1253206
-Marshall-, вводи в текст форматирование и комментарии. Уважай себя и других. Твой код читать невозможно!
Какой end к чем относится? Где начинается и, еще интересней, где заканчиваются условия?
То же самое с циклами. Тело цикла сдвинуть вправо, для нормальной читаемости.


Время: 15:57.

Время: 15:57.
© OSzone.net 2001-