Задачка на PASCAL

[Crew]

Animal
Они наверное типы данных определили как интеллектуальную собственность.
vasketsov
Мне тоже интересно

[paladin]

Задачка такого плана: "шаг в for"
тоисть с помощю for(!) сделать так:

мне надо чтобы паскаль брал каждый раз "i" не 1 а допустим 0,5
тоисть стандартно у не каждий раз прибавляеться 1 а мне надо 0,5. (стандартно=1 2 3 4 5 .. 50, а мне надо *1 1,5 2 2,5 .. 50)

[Dimon]

paladinzluka
ЕМНИП это делается так: for i:=1 to 50 step=0.5 do

[Volvo]

Dimon

Это в Паскале не пройдет. По определению - в операторе FOR должен быть ЦЕЛЫЙ параметр, и изменяться он может только с шагом 1 или -1. Для другого шага - WHILE или REPEAT.



Исправлено: Volvo, 0:42 12-08-2004

[paladin]

Volvo
Спасибо, я так думал всегда, но поступила такая задачка и решить ее надо только через for. Вот тут я и начал думать и спросил на форуме. Теперь прийдеться сказать что либо использовать надо WHILE или REPEAT или перейти на другой язик программирования.
* * * * * * * * * * * * * * * * * * * * * * * * ** * * * * * * * * * * Еще раз всем спасибо :oszone:

[d dem]

Цикл с шагом 0.5

( аналог for i:=0 to 100 step 0.5 do )

for z:=0 to 200 do begin
    i:=z div 2;
( или i:=z shr 1 :) )
end;

[Volvo]

d dem

Ты хорошо подумал?

Ну и какого типа у тебя должна быть "i" ?


Исправлено: Volvo, 12:12 31-08-2004

[d dem]

Пардон, увлекся !

for i:=0 to 100 step 0.5
( мля, бейсик с нами ! :) )

program loop;

var z:integer;
      i:real;
begin

for z:=0 to 100 * 2  do begin
   i:=z / 2;
   writeln( i );
end;

end.