Помогите написать программу на Pascal

  • Чтобы отвечать, сперва войдите на форум

    Макс^^

  • Пользователь
    С нами с 6 ноября 11
  • 157
    1
    4

Пацанчики помогите с задачей:
Составить программу для вычисления значения функции y=x*x+3*x (y=x^2+3x)  на отрезке [a,b] с шагом 1. (на паскале)

С помощью функции for 
Очень надо. Буду признателен

 


Изменено: Макс^^, 16 марта 2015 - 09:35

    • 0
  • Наверх
16 марта 2015 - 09:32

    MrMalina

  • Пользователь
    С нами с 24 ноября 10
  • 64
    0
    0
    • 4
  • Наверх
16 марта 2015 - 09:43

    Макс^^

  • Пользователь
    С нами с 6 ноября 11
  • 157
    1
    4

Если не трудно, не мог бы ты объяснить зачем нужны доп. операторные скобки бегин и енд.
Я нуб в паскале) 


Хочу 1000 репы)
    • 0
  • Наверх
16 марта 2015 - 09:49

    MrMalina

  • Пользователь
    С нами с 24 ноября 10
  • 64
    0
    0

Так как в цикле мы используем две операции:

 ->1. Подсчет выражения (y=...)

 ->2. Вывод полученного результата.

 

Если мы не будем использовать операторные скобки, то, по синтаксису паскаля, только одна операция после объявления цикла будет выполняться в цикле (в нашем случае подсчет y=), а последняя операция будет вне цикла и выполнится один раз.

 

Пример, что будет, если забыть написать операторные скобки:

 

for i:=1 to 3 do

y:=i*i;

writeln(y);

 

Будет выведено 9.

 

Пример, как надо сделать:

 

for i:=1 to 3 do  begin
y:=i*i;
writeln(y);

end;

 

Будет выведено:

1

4

9


Изменено: MrMalina, 16 марта 2015 - 09:55

    • 3
  • Наверх
16 марта 2015 - 09:52

    Макс^^

  • Пользователь
    С нами с 6 ноября 11
  • 157
    1
    4

Так как в цикле мы используем две операции:

 ->1. Подсчет выражения (y=...)

 ->2. Вывод полученного результата.

 

Если мы не будем использовать операторные скобки, то, по синтаксису паскаля, только одна операция после объявления цикла будет выполнять в цикле (в нашем случае подсчет y=), а последняя операция будет вне цикла и выполнится один раз.

 

Пример, что будет, если забыть написать операторные скобки:

 

for i:=1 to 3 do

y:=i*i;

writeln(y);

 

Будет выведено 9.

 

Пример, как надо сделать:

 

for i:=1 to 3 do  begin
y:=i*i;
writeln(y);

end;

 

Будет выведено:

1

4

9

Спасибо 


Хочу 1000 репы)
    • 0
  • Наверх
16 марта 2015 - 09:55


1 пользователей читают эту тему

0 пользователей, 1 гостей, 0 невидимых